ainstance( ) 函数示例

在下面的示例中，将用 createobject( ) 函数创建 visualfoxpro 表单基类的两个实例。然后用 ainstance( ) 函数创建数组 gamyarray，数组中包括每个表单实例的内存变量引用(goinstance1 和 goinstance2)。最后显示数组的内容。

clear all
goinstance1 = createobject('form')
goinstance2 = createobject('form')

clear
? ainstance(gamyarray, 'form') && 返回值2，表示有两个表单实例
display memory like gamyarray && 显示引用值