一个很是基础的问题————布尔变量的问题。在线等待！！！！！

Question

大家好：
     请问一下：布尔变量申请后，如果没给它指定一个值（true 或 false）,系统会不会给它一个默认的值啊？？？？？？？？？？？？？？？？？？？？？？？？？？？？？还有：procedure TForm1.Button1Click(Sender: TObject);
var
 b:boolean;
 s:string;
begin
 b:=true;
 s:=booltostr(b);
 memo1.Lines.Add(s) ;
end;我运行了一下这个程序后，怎么memo1显示的是-1 啊？？？？？？？？书上不是说的了吗是true 的时候是1或大于1的任何正整数，是false的时候是0。请问一下啊这是怎么回事啊？？？？？？？？？？？？？？还是我没搞清楚啊？？？？？？？？？？？？？？？
请大家指教！！！！！！！！！！！！！！！！！！！

Answer 1

默认布尔值是FalseFalse===>0
True====>-1

Answer 2

function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;Value of B Value of UseBoolStrs Value of returned stringtrue false '-1'
true true The first string in TrueBoolStrs (default TRUE)
false false '0'
false true The first string in FalseBoolStrs (default FALSE)

Answer 3

procedure TForm1.Button2Click(Sender: TObject);
var
 b:boolean;
 s:string;
begin
 b:=true;
 s:=booltostr(b,true);
 memo1.Lines.Add(s) ;
end;

Answer 4

在不付值情况下，系统有默认值的，是false
Value of B Value of UseBoolStrs Value of returned stringtrue false -1
true true The first string in TrueBoolStrs (default true)
false false 0
false true The first string in FalseBoolStrs (default false)
明明是-1啊