Estimados todos:
La consulta es sencilla, ¿En las opciones de los menús desplegables, se puede hacer que al pasar el cursor en cada opción, se muestre como Tooltip el valor de MESSAGE?
Saludos
Fernando Espinoza A.
Estimados todos:
La consulta es sencilla, ¿En las opciones de los menús desplegables, se puede hacer que al pasar el cursor en cada opción, se muestre como Tooltip el valor de MESSAGE?
Saludos
Fernando Espinoza A.
#include "FiveWin.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd MENU BuildMenu()
oWnd:bMenuSelect = { | oMenuItem | MsgBeep(), If( oMenuItem != nil, oWnd:ShowToolTip( 100, 100, oMenuItem:cMsg ),) }
SET MESSAGE OF oWnd TO "test"
ACTIVATE WINDOW oWnd CENTERED
return nil
function BuildMenu()
local oMenu
MENU oMenu
MENUITEM "Files"
MENU
MENUITEM "New" MESSAGE "menuitem"
ENDMENU
ENDMENU
return oMenuEstimado Antonio:
Hice la prueba, compila bien, al ejecutarse el EXE no me muestran mensajes de error, pero el Tooltip con el contenido de MESSAGE no se muestra.
Saludos
Fernando Espinoza A.
Algún avance?
No de momento
Le he intentado de varias formas durante bastante tiempo, y, aunque no he "tirado la toalla aun", he visto que es bastante complicado conseguirlo.
Si consigo algun avance, lo publicaré en este hilo