//当参数是一个表达式类型时,返回true。
a :=@'dfhdv'+'dbf'; //函数参数a为一个表达式
result:= ifExp (a);
Return result;
//当参数不是一个表达式类型时,返回false。
a :='sdhv'+'dbf'; //函数参数a不为表达式
result:= ifExp (a);
Return result;
//对数组第一维度数据进行类型判断
t:=array(1,3.16,@"A",(nil,@"C",3.14),nil);
return IfExp(t,-1);
//结果:array(0,0,1,0,0)
//对数组中每一数据进行类型判断
t:=array(1,3.56,@"A",(nil,2.14,@"C"),nil);
return IfExp(t,1);
//结果:array(0,0,1,(0,0,1),0)