wie merken, wenn mein Programm nicht im Vordergrund ist?

[Illuminator-23-5]

wenn man es irgendwann mal feststellen will, dürfte folgendes funktionieren:
  if GetActiveWindow = Handle then ...

[Pseudemys Nelsoni]

hm..bei "OnMessage" hab ich ein problem... wieso ist es cardinal? dachte windows botschaften sehen so aus: WM_...

[Pseudemys Nelsoni]

naja das brauch ich sowieso nicht...

was ich brauche ist das:

Delphi-Quellcode:

procedure TForm11.ApplicationEvents1Deactivate(Sender: TObject);
begin
  if Sender = Form11 then
  Application.Minimize;
end;

eigentlich sollte sich doch dabei das programm minimieren wenn form11 deaktiviert ist oder? - tut es aber nicht, wieos das?