SET SHADOW ON DEFINE POPUP GridPopup ; FROM MROW(), MCOL() ; && or 0,0 if you want the menu in the upper edge MARGIN ; SHORTCUT DEFINE BAR 1 OF GridPopup PROMPT 'Line 1' DEFINE BAR 2 OF GridPopup PROMPT 'Line 2' DEFINE BAR 3 OF GridPopup PROMPT "\-" Define Bar 4 Of GridPopup Prompt 'Line 3' ON SELECTION POPUP GridPopup _screen.activeform.GridPop(BAR()) ACTIVATE POPUP GridPopup <pre> After using the popup you can release it with <pre> RELEASE POPUP GridPopupEventually you can place that directly after the activat popup line