Delphi SysUtils.BoolToStr -将布尔值转换为字符串。

Delphi SysUtils.BoolToStr -将布尔值转换为字符串。

原型:

function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;
const
  cSimpleBoolStrs: array [boolean] of String = ('0', '-1');
begin
  if UseBoolStrs then
  begin
    VerifyBoolStrArray;
    if B then
      Result := TrueBoolStrs[0]
    else
      Result := FalseBoolStrs[0];
  end
  else
    Result := cSimpleBoolStrs[B];
end;

参数:

  B  UseBoolStrs  值

  true   false     1
  true   true     The first string in TrueBoolStrs (default ‘TRUE’)
  false   false     0
  false   true     The first string in FalseBoolStrs (default 'FALSE')

使用示例:

ShowMessage('True: '+BoolToStr(True));  //-1
ShowMessage('False: '+BoolToStr(False));  //0
ShowMessage('True: '+BoolToStr(True,True));  //True
ShowMessage('False: '+BoolToStr(False,True));  //False

  

  

 

 

 

 

创建时间:2022.07.08  更新时间:

posted on 2022-07-08 09:35  滔Roy  阅读(750)  评论(0编辑  收藏  举报

导航