点击或拖拽改变大小

Functions.AClass 方法

X#
-- todo --
将对象的类名及其祖先类名放入变量数组中。

命名空间:  XSharp.VFP
程序集:  XSharp.VFP (在 XSharp.VFP.dll 中) 版本:2.22 GA
语法
 FUNCTION AClass(
	ArrayName,
	oExpression
) AS USUAL CLIPPER
查看代码

参数

ArrayName (Optional)
类型:__Usual
指定用于存放类名的数组名称。
oExpression (Optional)
类型:__Usual
指定一个对象,其类名和祖先类名将被放入数组中。 oExpression 可以是任何对象表达式,如对象引用、对象变量或对象数组元素。

返回值

类型:__Usual
数值
备注
如果指定的数组名不存在,X# 会自动创建该数组。 如果指定的现有数组不够大,无法容纳所有父类名,X# 会自动增加数组的大小。 如果数组大于所需大小,数组大小将被截断。如果指定了现有的二维数组, 该数组将被重新调整为一维数组。

AClass() 创建一个一维数组,包含指定对象的类名及其祖先类名。 数组的第一个元素包含对象的类名,第二个元素包含对象的父类名, 第三个元素包含对象的祖父类名,依此类推。
AClass() 返回数组中类名的数量。如果无法创建数组,AClass() 返回 0。
示例
X#
 1Clear
 2frmMyForm = CreateObject("FormGrandChild")
 3
 4For nCount = 1 TO AClass(gaNewarray, frmMyForm)    // 创建一个数组
 5    ? gaNewarray(nCount)  // 显示类名
 6ENDFor
 7
 8RELEASE frmMyForm
 9
10DEFINE CLASS FormChild AS ForM
11ENDDEFINE
12
13DEFINE CLASS FormGrandChild AS FormChild
14ENDDEFINE
参见