题目
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;
为什么返回的结果不同?
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;
为什么返回的结果不同?
提问时间:2021-02-12
答案
在没对t 赋值时,系统默认为true
在button1的if中是判断t是否为真,而button2的if中是判断t是否等于true(是有对t已经赋值了),所以在button2中系统只执行else edit1.text := '111'
希望我的回答对你有帮助,愿早日解开你的疑惑!
在button1的if中是判断t是否为真,而button2的if中是判断t是否等于true(是有对t已经赋值了),所以在button2中系统只执行else edit1.text := '111'
希望我的回答对你有帮助,愿早日解开你的疑惑!
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1杂货店的刘叔叔进了一大袋白糖,现在他要用天平把330克的白糖分成三份,装成3小袋,只有一个10克20克的砝码
- 2if用在否定句中,怎么翻译,用在否定句中的if可以翻译成“是否”,还是只能翻译成“如果”?
- 3修改病句.谁也不能否认小红的优异成绩不是勤学苦练得来的.
- 4英语翻译
- 5I ____ an interest in art when I was young.
- 6把1、2、3、4、5、6、7、8、9这九个数填入下面的九个方格内,每个数只能用一次,使等式成立. □×□×(□+□+□+□)×(□+□-□)=2002.
- 7列宁称高尔基什么最杰出的代表
- 8某大型商场的自动扶梯正在匀速向上运送顾客,现在甲乙两人先后沿着扶梯向上奔跑,甲乙在扶梯上向上奔跑速度分别是1.5m/s和1.8m/s,甲乙两人登台阶数分别为42级和45级,则自动扶梯匀速运动速度为多少
- 9英语翻译
- 10证明函数f(x)=-2x+1在R上是减函数.
热门考点
- 1乙酰苯胺的制备中为什么要用新蒸馏过的苯胺?
- 2We have pork and soup for lunch.(改否定句)
- 3卡方分布到底是什么?
- 4x趋近于负无穷大 求1/{x[x+√(x^2-4)]}的极限
- 5How do you like 接宾格还是主格
- 6数学mod符号和乘法的优先级,如(a mod m·b mod m)mod m,用括号分开一下
- 7我国黄河流域的黄土高原,在13世纪时曾是肥沃的森林草原地带,而现在不少地区已成荒山秃岭、土地沙化,造成这种现象的主要原因是( ) A.长期干旱,造成土地沙化 B.人类过度开发
- 8形容工作认真,忘我的成语有哪些?
- 9237乘以99+337用简便计算
- 10一物体以初速度v 1做匀变速直线运动 经时间t 2求 1物体在时间t 内的位置