ToolTip con Imagen

[Willi Quintana]

Sera posible que los ToolTips incluyan una imagen???
Salu2

[Willi Quintana]

Alguna idea??

[Armando]

Hola Maese !

Por lo pequeño de los ToolTips deduzco que lo que deseas es un
pequeño icono, si esto es verdad existe una forma de elegir entre
dos o tres iconos que ya vienen con la clase.

Saludos

[AIDA]

Hola

a si lo manejo yop


oBrwX01:cTooltip :={ "POLIZAS DE AUTOS (C)Copyright 2010 - Por Aida Sistemas S.A.", "POLIZARIUM",1,CLR_WHITE,CLR_HBLUE }


puedes usar el 1 , 2 y 3

Saluditos

[Willi Quintana]

Muy, muy, muy agradecido.... funciono con las opciones,,,,i seria mejor aun si pudieramos colocar otras imagenes,,,
Salu2

[AIDA]

sip a la mejor modificando la clase de tooltips se pueda


Saluditos

[hmpaquito]

¿ Alguien consiguio poner una imagen (TImage o similar) a un Tooltip ?

[Marcelo Via Giglio]

Hola,

prueba el ejemplo c5toolti.prg del directorio sample de FiveWin

saludos

Marcelo

[hmpaquito]

Gracias Marcelo por su comentario.

No he visto ninguna clase que incorpore el C5ToolTip. Los ejemplos que he visto solo son pruebas de concepto, pero no estan aplicados a ninguna clase y por ende no aparece en ellos el ciclo del tooltip de creacion-new()/ mostrado-show()/ destruccion-destroy()

Efectivamente estaba viendo las posibilidades de C5ToolTip e implementandolo dentro de un control TSBrowse.
En primera instancia la implementacion que he hecho hace crash porque porque consume todos los recursos.

He visto que el señor Silvio ha dado unas pautas, que voy a probar, en http://fivetechsupport.com/forums/viewt ... =0#p142167

Saludos

[Antonio Linares]

Por lo visto se le podría asignar un bitmap a un tooltip de esta forma:

#define STM_SETIMAGE 0x0172

SendMessage( oToolTip:hWnd, STM_SETIMAGE, 0, hBitmap )

Ahora se trata de ver en donde se podría implementar

[hmpaquito]

Pues muchas gracias Antonio por el interes.

Resulta que llevo no se cuanto tiempo intentando el c5tooltip y no hay forma de que funcione. Cuando no es una cosa es otra. Y al final, si llegara a conseguir que funcionara, sera un tooltip no balloon, lo cual no me agrada.

A partir de tu informacion he encontrado que parece que haya que inicializar primero el tooltip con el parametro TTM_ADDTOOL y despues ya asignarle el bitmap con el mensaje STM_SETIMAGE. He hecho la prueba sin el TTM_ADDTOOL y no ha funcionado.

Aqui hay info, alguna que indica que es preceptivo llamar previo a STM_SETIMAGE a TT_ADDTOOL

http://forums.codeguru.com/showthread.php?367449-setting-minimal-height-for-tooltip-with-bmp
https://msdn.microsoft.com/en-us/library/hh298401(v=vs.85).aspx
http://winbinder.org/files/repository/csource/core/wb/wb_control.c

Lastima que mis conocimientos de C sean perfectamente definibles.

Saludos

[Antonio Linares]

Paco,

Prueba asi y llama a SetAddTool( oTooltip:hWnd )

Code: Select all  Expand view

#pragma BEGINDUMP

#include <windows.h>
#include <hbapi.h>

HB_FUNC( SETADDTOOL ) // hWnd
{
    TOOLINFO ti;
    HWND hWnd = ( HWND ) hb_parnl( 1 );

    ti.cbSize   = sizeof( ti );
    ti.uFlags   = TTF_TRANSPARENT | TTF_CENTERTIP;
    ti.hwnd     = hWnd;
    ti.uId       = 0;
    ti.hinst    = NULL;
    ti.lpszText = LPSTR_TEXTCALLBACK;

    GetClientRect( hWnd, &ti.rect );

    SendMessage( hWnd, TTM_ADDTOOL, 0, ( LPARAM ) &ti );
}

#pragma ENDDUMP
 

[hmpaquito]

Voy !

[Antonio Linares]

Esta línea sobra:

ti.lpszText = LPSTR_TEXTCALLBACK;

ó prueba a escribirla asi:

ti.lpszText = NULL;

[hmpaquito]

Voy a intentarlo, no me estaba funcionando asi

Code: Select all  Expand view

SetAddTool(hWnd)

#define STM_SETIMAGE 0x0172
hBitmap := ReadBitmap( 0, "\video.bmp")
SendMessage( hWnd, STM_SETIMAGE, 0, hBitmap )

Voy a poner tu correccion.

pd. He añadido commctrl.h