
30.12.2007, 00:37
|
 |
Активный
|
|
Регистрация: 27.12.2006
Адрес: Псков
Сообщения: 274
Версия Delphi: Delphi 7
Репутация: 497
|
|
Код:
SetWindowPos(Form1.Handle, HWND_TOPMOST, 0, 0, 0, 0,
SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
- То же самое, но так поверх всех окон можно сделать любое окно, зная его идентификатор, для твоей формы это Form1.Handle
А так обратно:
Код:
SetWindowPos(Form1.Handle, HWND_NOTOPMOST, 0, 0, 0, 0,
SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
__________________
Велик и могуч наш Object Pascal !
ICQ: 357-591-887
|