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

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

Как можно определить активно ли окно приложения?


pAhA ©   (2005-11-17 08:08:00) 

Удалено модератором
Примечание: СПАМ


pAhA   (2005-11-17 08:52:00) [1]

>>var
>> h: HWND;
>>....
>> h := GetActiveWindow;
>> if h = Form1.Handle then
>>   // Form1 Активно
>> else
>>  // Form1 НеАктивно

А как можно это использовать? тоесть мне нужно создать какойто обработчик типа:

procedure TForm8.Imyaproceduri(Sender: TObject);
....
begin
...
end;


ShiFT   (2005-11-17 08:46:00) [2]

var
 h: HWND;
....
 h := GetActiveWindow;
 if h = Form1.Handle then
   // Form1 Активно
 else
   // Form1 НеАктивно


pAhA   (2005-11-17 08:46:00) [3]

Да. Это верный код. Но получается следующее: эти события вызываются только при переходе от одного окна приложения к другому окну этого же приложения.
А вот как можно сделать так, чтобы определять деактивацию/активацию окна при переходе к другим приложениям?
Спасибо.


Crazy_Diman   (2005-11-17 08:34:00) [4]

procedure TForm1.FormActivate(Sender: TObject);
begin
здесь делаеш все что тебе нужно если окно активное
end;
procedure TForm1.FormDeactivate(Sender: TObject);
иупшт
утвж


Наверх

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