delphi的boolean问题

来源:百度知道 编辑:UC知道 时间:2024/05/31 00:23:11
procedure TForm1.bClick(Sender: TObject);
var y:Boolean;
begin

if y=false then
begin
b.Caption:='结束';
y:=true ;
end
else
begin
b.Caption:='开始';
y:=false ;
end;

end;

end. //为什么不按扭不在“开始”和“结束”之间变换啊,boolean的默认不是false是吗,请高手指教,本人新手

var y:Boolean;应该作为全局变量才有意义。
var
Form1: TForm1;
y:Boolean;
implementation
{$R *.dfm}
procedure TForm1.BClick(Sender: TObject);
begin
if y=false then
begin
b.Caption:='结束';
y:=true ;
end
else
begin
b.Caption:='开始';
y:=false ;
end;
end;

y是一个局部变量.
首先 y是false,你点了后,按钮事件结束,y就被清楚了
你再点 就进入上面这个循环了

你多点几下B这个按钮试试吧。应该没什么问题才对呀。
Boolean类的默认确实是False值。

逻辑判断应该是 == 吧