[Delphi] Aktywna/nieaktywna forma??? ;]

Wie ktos moze jak wykryc, czy forma (okno) jest aktywna(e)???
tzn. jesli jest aktywna, to zeby kolor miala niebeski, a jesli nie to zeby kolor byl szary... ;]

Może tak:

if getforegroundwindow=handle then
.....

Ulepszeniem tego co powiedział thenkles jest ten kod (od razu z kolorowaniem formy):

if getforegroundwindow = handle then
Form1.Color:= clBlue else
Form1.Color:= clSilver;

Możesz to wrzucić np. do timerka.