![]() |
|
|
#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); |