Delphi中if c then 与if c=true then 的区别?procedure Tform1.button1click(sender:Tobject);var t:boolean;beginif t then edit1.text :='t=true'else if not t then edit1.text := 't=false'else edit1.text := '111';//结果返回TRUEend;procedure Tform1.button2click(sender:Tobject);var t:boolean;beginif t=true then edit1.text :='true'else if t=false then edit1.text := 'false'else edit1.text := '111';//结果返回111end;为什么返回的结果不同?

问题描述:

Delphi中if c then 与if c=true then 的区别?
procedure Tform1.button1click(sender:Tobject);
var t:boolean;
begin
if t then edit1.text :='t=true'
else if not t then edit1.text := 't=false'
else edit1.text := '111';//结果返回TRUE
end;
procedure Tform1.button2click(sender:Tobject);
var t:boolean;
begin
if t=true then edit1.text :='true'
else if t=false then edit1.text := 'false'
else edit1.text := '111';//结果返回111
end;
为什么返回的结果不同?

在没对t 赋值时,系统默认为true
在button1的if中是判断t是否为真,而button2的if中是判断t是否等于true(是有对t已经赋值了),所以在button2中系统只执行else edit1.text := '111'

希望我的回答对你有帮助,愿早日解开你的疑惑!