FiveTech Support Forums

   DEFINE BACKSTAGE oBackStage 
   
   DEFINE BSBUTTON OF oBackStage PROMPT "Save" ;
           BITMAP "..\fwh\bitmaps\alphabmp\bs_save.bmp" MENU oMenu1;
          GRADIENT { { 1, nRGB(  255, 255, 0 ), nRGB( 255, 255, 255 ) } }
          
 
   DEFINE BSSELECT OF oBackStage PROMPT "Contable";
          COLORTEXT NIL, CLR_HRED MENU oMenu1  //ACTION Msginfo( oOpt:cPrompt )

   DEFINE BSBUTTON oBtn OF oBackStage PROMPT "Save" ;
          BITMAP "..\bitmaps\alphabmp\bs_save.bmp"; //ACTION Msginfo( oOpt:cPrompt );
          GRADIENT { { 1, nRGB(  255, 255, 0 ), nRGB( 255, 255, 255 ) } };
          ACTION MyShowMenu( oBtn )

....

static FUNCTION myShowMenu( oWnd )
   local oMenu

   MENU oMenu POPUP 2007
      MENUITEM "Style Set" FILE "..\bitmaps\styleset161.BMP"
      MENUITEM "Colors"
      MENUITEM "Font"
   ENDMENU

   ACTIVATE POPUP oMenu WINDOW oWnd:oContainer AT oWnd:nTop+oWnd:nHeight, oWnd:nLeftMargin

RETURN NIL