再请教触发问题?
DEFINE CLASS myhandler AS Session
PROCEDURE MouseDown
LPARAMETERS nButton, nShift, nXCoord, nYCoord
THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
ENDPROC
ENDDEFINE
*THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
*THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
*abc.vcx
*现在不能显示
[解决办法]
你先正常调试
THISFORM.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.AA.VISIBLE=.T.
看看能显示吗?如果能是这段
THISFORM.ACTIVECONTROL.NewObject( 'AA ', 'B ', 'ABC ')
THISFORM.ACTIVECONTROL.AA.VISIBLE=.T.
有问题,
如果不能显示就是NewObject有问题。