![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как можно определить активно ли окно приложения?
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);
иупшт
утвж