FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Menu en Dialogo usando boton derecho del mouse
Posts: 1276
Joined: Tue Dec 28, 2010 01:29 PM
Menu en Dialogo usando boton derecho del mouse
Posted: Thu Jun 08, 2017 05:43 PM

Saludos foro

Es posible desplegar un menu popup sobre un dialogo pulsando el boton derecho del mouse?

Atento

FWH 25.12

Harbour/Hbmk2

Microsoft Visual C++

MySql 8.0

Antigravity

Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Menu en Dialogo usando boton derecho del mouse
Posted: Thu Jun 08, 2017 05:55 PM
Si
Code (fw): Select all Collapse
.../...

      oDlg:bRClicked   := { | nR, nC |  Menu1(  nR, nC ) }

.../...

//----------------------------------------------------------------------------//

Function Menu1( nR, nC )

   local oMenu

   MENU oMenu POPUP
      MENUITEM "Item 3 1"
      SEPARATOR
      MENUITEM "Item 3 2"
      MENUITEM "Item 3 3"
   ENDMENU
   // Suponemos que la variable oDlg es estática, sino, pasásela como parámetro a esta function
   ACTIVATE MENU oMenu OF oDlg AT nR, nC

Return oMenu

//----------------------------------------------------------------------------//
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 1276
Joined: Tue Dec 28, 2010 01:29 PM
Re: Menu en Dialogo usando boton derecho del mouse
Posted: Thu Jun 08, 2017 06:11 PM

Muchas gracias Cristobal

FWH 25.12

Harbour/Hbmk2

Microsoft Visual C++

MySql 8.0

Antigravity

Continue the discussion