【Delphi】逻辑型 Boolean 转字符串 简单方法

有时候我们需要把逻辑型（Boolean）的True或者False转换成字符串“True”或者“False”。可以使用ToString函数中的TUseBoolStrs.True 来直接转换。

var
  B : Boolean;
  S : string;
begin
  //默认用法
  B := False;
  S := B.ToString;
  //S = "0"
  B := True;
  S := B.ToString;
  //S = "-1"
  //使用TUseBoolStrs
  B := False;
  S := B.ToString(TUseBoolStrs.True);
  //S = "False"
  B := True;
  S := B.ToString(TUseBoolStrs.True);
  //S = "True"
  B := False;
  S := B.ToString(TUseBoolStrs.False);
  //S = "0"
  B := True;
  S := B.ToString(TUseBoolStrs.False);
  //S = "-1"
end;

另外，也可以使用BoolToStr函数

function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string