Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.08;
Скачать: CL | DM;

Вниз

Как соорудить окошко типа PopUp   Найти похожие ветки 

 
Still Swamp   (2005-11-02 11:57) [0]

Как соорудить окошко типа PopUp? Те я хочу что бы мое окно убиралось при клике мышей мимо него. Возможно для этого есть какой нить стиль в API.


 
ShiFT   (2005-11-02 12:14) [1]


 TForm1 = class(TForm)
   procedure ACTIVATEProc( var msg : TMessage); message WM_ACTIVATE;
...
 end;
...

procedure TForm1.ACTIVATEProc(var msg: TMessage);
begin
 if LOWORD(msg.WParam) = WA_INACTIVE then begin
   Close;
 end;
end;
Проверенно. Работает.



Страницы: 1 вся ветка

Текущий архив: 2006.01.08;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
2-1134979390
AMD Andron64
2005-12-19 11:03
2006.01.08
Rar


14-1134504989
(CHALING 32)S K i N E R
2005-12-13 23:16
2006.01.08
CHAT


2-1135196659
Scrol
2005-12-21 23:24
2006.01.08
Поиск


2-1135153090
Barsky
2005-12-21 11:18
2006.01.08
Сортировка в запросе (ORDER)


14-1134272253
Думкин(_врем)
2005-12-11 06:37
2006.01.08
А что нам, чукотским...