Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сделать чтобы окно всегда было поверх остальных окон [Win2k, WinXP]


Greg123 ©   (2005-05-28 19:16:00) 

У меня есть exe-файл программы, моя программа запускает этот exe-шник.
Как сделать так, чтобы при открытии любых окон, эта прога(exe-шник) была всё время сверху???


Greg123   (2005-05-28 21:39:00) [1]

Для помещения окна поверж остальных окон,я использую такой код:

window_handle:=FindWindow(nil,pchar('ГлОкно'));
 if window_handle<>0 then
   begin
     if(window_handle<>GetFocus) then
       begin
         SetForegroundWindow(window_handle);
         SetWindowPos(window_handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE+SWP_NOSIZE);              end;
   end;

Окно действительно остаётся наверху, но оно не активно

Как это можно исправить???


Greg123   (2005-05-28 20:30:00) [2]

Как это понять?


XProger   (2005-05-28 20:25:00) [3]

Stay on Top


Наверх

Титульная страница Поиск, карта сайта Написать письмо