请教:在VFP9中,如何判断程序方式创造的对象是否存在?
如题,我在表单中创建了一个方法程序mywinsock_active如下:
thisform.addobject( "mywinsock_tcp ", "mywinsock ")
但程序中某按钮将可能重复调用该方法程序,所以必须进行一个判断,如果对象已经存在则不执行该方法程序,否则执行该方法程序,请高手告之小弟如何判断对象是否存在!
程序中的另一按钮的代码为释放该对应,一方面我不知道如何判断该对象是否已经存在,另一方面我使用release 无法释放这个对象,请高手帮助我,万分感谢!
[解决办法]
或:
IF VARTYPE(thisform.mywinsock_tcp)= 'U '
MESSAGEBOX( '此对象不存在 ')
ENDIF
或
IF TYPE( 'thisform.mywinsock_tcp ')= 'O '
MESSAGEBOX( '此对象存在 ')
ENDIF
或
IF TYPE( 'thisform.mywinsock_tcp ')= 'U '
MESSAGEBOX( '此对象不存在 ')
ENDIF
[解决办法]
if tYPE( 'thisform.label1 ')= 'O '
MESSAGEBOX( '此对象存在 ')
ENDIF
OR
VARtYPE( 'thisform.label1 ')= 'C '
MESSAGEBOX( '此对象存在 ')
ENDIF