如题,我在表单中创建了一个方法程序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