TempELecEn : Boolean; if TempELecEn = true then
showmessage('error')
else
showmessage('error2');
if TempELecEn =False then //如果没有碰到电气性能
shomessage('error3');
TempELecEn = false 时 结果仅弹出error2....郁闷。
有碰过类似问题的朋友吗? 教我怎么整死它。
showmessage('error')
else
showmessage('error2');
if TempELecEn =False then //如果没有碰到电气性能
shomessage('error3');
TempELecEn = false 时 结果仅弹出error2....郁闷。
有碰过类似问题的朋友吗? 教我怎么整死它。
解决方案 »
- 禁止控件的OnChange
- 问个比较初浅的问题
- 怎么样在MACHINE-REPORT打印之前,用代码设计页边距???急~~`
- 在线给分.........................................谁知道类似pagecontrol的第三方,并告知下载地址...................................
- 取TreeView当前节点的节点序号??怎么取?!
- 急急急急急,在局域网中,知道某一计算机的名称,如何获得它的ip地址,送高分
- 在TMonthCalendar控件的事件中有没有可以代替onchange事件的?
- 各位大侠:请帮忙我看看错误,谢谢!!!
- 题一个关于类层次结构的问题,详情入内细看
- ★★据了解搞底层开发比搞行业数据库管理软件开发容易,不知道大家有没有这种体会?★★
- 解遍数据的问题?
- delphi下intraweb开发的exe文档如何在iis下面发布?
因为boolean存储的值:0--fasle; 1--true; 2..255--其他
所以如果在与其他语言进行调用时,最好用bytebool等
TempELecEn = false 时 结果先弹出error2,点击“确定”后,再弹出error3
var
TempELecEn : Boolean; //应该这样定义TempELecEn : ByteBool;
P:Pbyte;
begin
P:=@TempELecEn;
P^:=2; //分别设为0,1,2 看看结果
if TempELecEn = true then
showmessage('error')
else
showmessage('error2');
if TempELecEn =False then //如果没有碰到电气性能
showmessage('error3');问题就出现在非delphi编写的程序对布尔存储的值定义不一样,一般0设为Fasle,非0设为True
而delphi的Boolean 0--fasle; 1--true; 2..255--就不属于布尔这个集合了,也就是2..255不在[0,1] 里,也不可能属于其任何一个子集所以在与非delphi编写的程序里,定义成TempELecEn : ByteBool;
-1 表示true
0 表示false
NULL
那我如何防止boolean型变量出现非true,false的情况。我的程序里未进行P:=@TempELecEn;
P^:=2; //分别设为0,1,2 看看结果
类似这样的处理,如何造成产生非true,false的结果? 请赐教