范例一:
//判断是否为32位整数类型
r1:= IfInt(1);
r2:= IfInt(3.14);
r3:= IfInt("A");
r4:= IfInt(array(1,2,3));
return array(r1,r2,r3,r4);
//结果:array(1,0,0,0)
范例二:
//对数组第一维度数据进行类型判断
t:=array(1,3.14,"A",(1,2,3),nil);
return Ifint(t,-1);
//结果:array(1,0,0,0,0)
范例三:
//对数组中每一数据进行类型判断
t:=array(1,3.14,"A",(1,2.1,3),nil);
return Ifint(t,1);
//结果:array(1,0,0,(1,0,1),0)