Tooltip en XIMAGE no funciona

Tooltip en XIMAGE no funciona

Postby Xevi » Sat Dec 30, 2017 12:19 am

Bien, pues otra que pillo por ahí dando vueltas con mis pruebas... todavía con pruebas!!!

La clase TXIMAGE no muestra un tooltip.

Code: Select all  Expand view

#include "fivewin.ch"

FUNCTION Main()
   Local oDlg, oImage

   DEFINE DIALOG oDlg FROM 0,0 TO 300,500 PIXEL TITLE "XIMAGE"
   oDlg:lTruePixel := .T.

   @ 50, 50 XIMAGE oImage SIZE 51, 51 FILENAME "c:\fwh\bitmaps\32x32\app.bmp" OF oDlg
   oImage:lTransparent := .T.
   oImage:cTooltip := "Mensaje Tooltip"

   ACTIVATE DIALOG oDlg

Return Nil
 
Un Saludo,
Xevi.

Aprendiz de la vida!!!
User avatar
Xevi
 
Posts: 108
Joined: Wed Nov 29, 2017 11:42 am
Location: Girona

Re: Tooltip en XIMAGE no funciona

Postby FranciscoA » Sat Dec 30, 2017 2:45 am

Xevi, intenta asi: (a mi, con FWH 1204 me funciona)
Code: Select all  Expand view
  REDEFINE IMAGE oImage ID 600 OF oDlg  //foto del empleado
   oImage:cTooltip := {"Hola"}
 

Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh1204-MySql-TMySql
User avatar
FranciscoA
 
Posts: 1464
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Tooltip en XIMAGE no funciona

Postby Antonio Linares » Sat Dec 30, 2017 9:25 am

Xevi,

En la Clase TXImage en el Método MouseMove() hay que modificar la línea final asi:

return ::Super:MouseMove( nRow, nCol, nFlags )

Con este cambio tu ejemplo funciona correctamente y muestra el tooltip.

Añadimos este cambio para la próxima versión de FWH 18.01

gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35267
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot], karinha and 4 guests