>DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL() >DEFINE BAR 1 OF shortcut PROMPT 'Delete' >DEFINE BAR 2 OF shortcut PROMPT 'Edit' >ON SELECTION BAR 1 OF shortcut _screen.ActiveForm.MyDeleteMethod() >ON SELECTION BAR 2 OF shortcut _screen.ActiveForm.MyEditMethod() >ACTIVATE POPUP shortcut >Wow, there's a trip down memory lane ;-)