Заголовок окна

[doniyor]

Хай всем!
Кто знает как узнать заголовок окна, которое активно. Т.е. мне нужно чтобы всякий раз когда какое либо окно становилось активным название заголовка заносилось в файл.

[Terran]

Procedure TForm1.Timer1Timer(Sender: TObject);
Var
S: HWND;
Name: Array [0..255] Of Char;
Begin
S:=GetForegroundWindow;
GetWindowText(S,Name,256);
Label1.Caption:=Name;
End;

[MalCer]

Вроде еще можно ф-ей FindWindow определить

[Lime]

Сообщение от MalCer

Вроде еще можно ф-ей FindWindow определить

Хэндл можно определить этой функцией. Но не заголовок.