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

← →
pAhA (2005-11-17 08:08) [0]

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

← →
Crazy_Diman © (2005-11-17 08:34) [1]

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

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

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

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

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

← →
pAhA (2005-11-17 08:52) [4]

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

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

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

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