加入触发有关问题

加入触发问题
&&   TEST.PRG
DEFINE   CLASS   myhandler   AS   Session
PROCEDURE   MouseDown
LPARAMETERS   nButton,   nShift,   nXCoord,   nYCoord
MESSAGEBOX(OHANDLER.NAME)     &&ok
                                    &&我想
                                    MESSAGEBOX(THISFORM.NAME)
DO   FORM   D:\RAYC\FORMS\MYQM.SCX   WITH   nXCoord,   nYCoord,THIS
ENDPROC  
ENDDEFINE

------解决方案--------------------------------------------------------
MESSAGEBOX(THISFORM.NAME)

改为

MESSAGEBOX(THISFORM.ACTIVECONTROL.NAME)

试试