//当参数是一个二进制类型时，返回true。
a:= binary('111111'); //函数参数a为二进制类型
result:= ifBinary (a);
  Return result;
 

//当参数不是一个二进制类型时，返回false。

a :='sdhv'; //函数参数a不为二进制类型

result:= ifBinary (a);

Return result;

//对数组第一维度数据进行类型判断
b:=Binary("3.14");
t:=array(1,b,"A",(nil,b,3.14),nil);
return IfBinary(t,-1);
//结果：array(0,1,0,0,0)

//对数组中每一数据进行类型判断
b:=Binary("3.14");
t:=array(1,b,"A",(nil,2.14,b),nil);
return IfBinary(t,1);
//结果：array(0,1,0,(0,0,1),0)