oApp.caller = NULL
However, I see a greater design problem here...if you have two forms running at the same time, and the user right-clicks in each, things may start to fall apart.>*/ - acctTextBox.RightClick >IF This.CalcField > oApp.oCaller = This > DO txtRightClick.mpr >ENDIF > >*/ -oApp.txtRightClick >PROCEDURE txtRightClick >LPARAMETERS lChoice > This.CalcMode = lChoice > IF !lChoice > This.oCaller.BackColor = RGB(255,0,0) > This.oCaller.ForeColor = RGB(255,255,255) > ELSE > This.oCaller.ForeColor = RGB(0,0,0) > This.oCaller.BackColor = RGB(255,255,255) > ENDIF > _screen.ActiveForm.Destroy > This.oCaller.Setfocus() >ENDPROC > >*/ -txtRightClick.mpr >DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL() >DEFINE BAR 1 OF shortcut PROMPT "Manual" >DEFINE BAR 2 OF shortcut PROMPT "Calculate" >ON SELECTION BAR 1 OF shortcut oApp.txtRightClick(.F.) >ON SELECTION BAR 2 OF shortcut oApp.txtRightClick(.T.) > >ACTIVATE POPUP shortcut >