Hola a todos,
¿Sabrían decirme que METHOD se lanza cuando se pulsa el ratón sobre una lína de un XBrowse?
Es decir, pulso sobre una línea de un XBrowse y quisiera mostrar un mensaje "Hola Mundo", y si puede ser el registro de donde venía y/o sobre cual he pulsado.
Muchas gracias
Method en Xbrowse al pulsar el ratón
Re: Method en Xbrowse al pulsar el ratón
Carlos,
Mírate por favor:
Salu2
Mírate por favor:
Code: Select all | Expand
:LButtonDown()
:lButtonUp()
:LDblClick()
:RButtonDown()
- leandro
- Posts: 1744
- Joined: Wed Oct 26, 2005 2:49 pm
- Location: Colombia
- Has thanked: 34 times
- Been thanked: 10 times
- Contact:
Re: Method en Xbrowse al pulsar el ratón
Creo que es lo que necesitas
Si quieres mostrar un menú debes hacer lo siguiente
Code: Select all | Expand
:bRClicked := {|nRow, nCol | msginfo(oBrw:nArrayAt) }
Code: Select all | Expand
:bRClicked := {|nRow, nCol | Mymenu( nRow,nCol,oBrw) }
function Mymenu( nRow, nCol, oBrw )
Local oPopup
MENU oPopup POPUP 2015
MENUITEM "Mis acciones"
MENUITEM "Cerrar Ventana" ACTION oWnd:end()
ENDMENU
ACTIVATE POPUP oPopup OF oBrw AT nRow, nCol
return nil
Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com
[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 24.09 ] [ xHarbour 64 bits) ]
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com
[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 24.09 ] [ xHarbour 64 bits) ]
Re: Method en Xbrowse al pulsar el ratón
Muchas gracias a los 2.
Lo he reesuelto con:
oXBrowse:bLButtonUp
Parece que no entro en conflicto con otros eventos, haré más pruebas pero parece que funcionará como lo tengo.
Muchas gracias,
Lo he reesuelto con:
oXBrowse:bLButtonUp
Parece que no entro en conflicto con otros eventos, haré más pruebas pero parece que funcionará como lo tengo.
Muchas gracias,
Un Saludo
Carlos G.
FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
Carlos G.
FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10