Delphi初学者遇到的问题。

Question

var
   f:boolean;
   i:integer;
begin
  f:=false;
  i:=ord(f);//利用ord可以转换成integer
  edit1.text:=inttostr(i);
edit1中显示为0

Answer 1

Delphi提供了这样的函数
Function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;
例如：
  edit1.txt:=Booltostr(3<4);  //文本框中显示的是'0'
  edit1.txt:=Booltostr(true);  //文本框中显示的是'-1'
  edit1.txt:=Booltostr(false,true);  //文本框中显示的是'False'
  edit1.txt:=Booltostr(2=3-1,true);  //文本框中显示的是'True'

Answer 2

if f = false then 
    edit1.text:= 'false'
//  edit1.text:= '0'
  else
    edit1.text:= 'true';
//  edit1.text:= '1';

Answer 3

var
   f:boolean;
   i:integer;
begin
  f:=false;
  if f then
  i:=0;
  if not f then
  i:=1;
  edit1.text:=inttostr(i);
对不对？你是不是想知道f是真还是假？

Answer 4

可以利用booltostr函数将Boolean值转换为string类型,可以再通过strtoint
函数转换成integer类型
例如
var
  str:string;
  i:integer;
begin
  str:=booltostr(true);
  i:=strtoint(str);
end;