Also for popup menu RESOLVED

[Silvio.Falconi]

oSpiaggia is the dialog

Code: Select all  Expand view  RUN

 oPanel:= TPanel():New(40,2,400,400,oSpiaggia)
             oPanel:SetBrush(oBrush1)
             oSpiaggia:oclient:=oPanel

             oPanel:bRClicked = { | nRow, nCol, nFlags |  ShowPopup( oPanel, nRow, nCol ) }

Function ShowPopup( oPanel, nRow, nCol )


             local oMenu
    MENU oMenu POPUP   2007


   MENUITEM "&Stampa Foglio Bagnino"  NAME "FOGLIO_BAGNINO"  ACTION NIL // foglio(oApp:oDlg)
  * MENUITEM "&Uscita Planning" action (oApp():oDlg:End(), oBarPre:END(), oApp:oBar:show())
   MENUITEM "&Statistica " action  NIL

   SEPARATOR

   MENUITEM "&Cerca un cliente"  NAME "FOGLIO_BAGNINO"  ACTION NIL

   ENDMENU

ACTIVATE POPUP oMenu OF oPanel AT nRow, nCol

RETURN( NIL )

I not see the popup why ?

[cnavarro]

Try with

ACTIVATE MENU oMenu AT nRow, nCol OF oPanel

[Silvio.Falconi]

resolved cris