ifObj
简述
判断value是否是一个ComObj对象或者一个TSL的对象类型。可通过可选参数N对数组中的行或元素进行判断。
ifObj(value:Any[;N:Integer]):Boolean;
| 名称 | 类型 | 说明 |
|---|
| value | Any | 任意类型数据 |
| N | Integer | 可选参数，整数。具体参考返回说明 |
| 返回 | Boolean |
布尔值，1表示是，0表示不是；返回结果说明如下
|
N值 |
Value数据类型 |
返回值数据类型 |
返回结果说明 | |
0 |
任意类型 |
整数 |
返回Value类型对应的数值 | |
正数 |
数组 |
数组 |
返回Value中每一维度每一单元格数据对应的类型数值集合，保持原Value数组结构和下标 | |
负数 |
数组 |
数组 |
返回Value中前-N个维度数据对应的类型数值集合，保持原Value前-N维度数组结构和下标 |
|
//当参数是一个对象类型时，返回true。
Type Function14=Class() //声明类
function SetName(newName);
Begin
name:=newName;
end;
End;
Obj:=CreateObject('Function14'); //使用CreateObject函数创建上面类Function14的对象
result:= ifObj (Obj);
Return result;
//当参数不是一个对象类型时，返回false。
a :='sdhv'; //函数参数a不为对象类型
result:= ifObj (a);
Return result;
ComObj