![]() |
|
#10
|
|||
|
|||
![]() NumLock, спасибо что пытаетесь помочь.
Цитата:
Код:
hWn:=Application.Handle; hWndTT:=CreateWindowEx(WS_EX_NOACTIVATE or WS_EX_TOPMOST, TOOLTIPS_CLASS, nil, WS_POPUP or TTS_NOPREFIX or TTS_BALLOON or TTS_ALWAYSTIP or TTS_CLOSE,Integer(CW_USEDEFAULT),Integer(CW_USEDEFAULT),Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT), hWn, 0, Application.Handle, nil); Я попробовал указать хендл формы Frm1Main Код:
hWn:=Frm1Main.Handle; Но сейчас меня больше взволновал другой вопрос - как установить автоматическое скрытие тултипа? (например через 3 секунды) Я пробовал добавлять Код:
SendMessage(hWndTT,TTM_SETDELAYTIME,TTDT_AUTOPOP,3000); |