比如，如下
aaa:某个算式；
if aaa不存在（如因为算式中个别数据没有，导致的无法计算） then bengin
b:=xx;
end
这个’不存在‘怎么表示呢
参考下下面这个，未完全检测。利用的是and的一些特性以及你的aaa如果存在返回的是数字的特点。不过还是有个BUG，如果aaa是小于1的小数（因为1 and 0.5 返回的是0），必须拿出来单独判断下，这里暂时不再多写了。
il:open-close>100000;
if il then KL:1;
//判断KL是否存在
u:0;//u=0,KL不存在；U=1，KL存在。
Yes:if(KL=0,1,0);//KL不存在或者KL不等于0，Yes都返回0，KL=0，那么Yes=1;
if not(YES) then
begin
u:=KL and 1;
end
else
begin
u:=1;
end