#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
SetAddTool(hWnd)
#define STM_SETIMAGE 0x0172
hBitmap := ReadBitmap( 0, "\video.bmp")
SendMessage( hWnd, STM_SETIMAGE, 0, hBitmap )
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Google [Bot] and 65 guests