Developing.ru

Работает со всеми окнами, кроме Internet Explorer почему
var
a: pchar ;
b: thandle;
begin
b:=GetForegroundWindow;
GetWindowText(b, a, 100);
Edit1.Text:=a;
Edit2.Text:=inttostr(b);
end;

Потому что окон там чуть больше чем одна штука

Я знаю, а как сделать что бы заработало?

Запустить WinSight32 и посмотреть всю иерархию окон. Потом в своём коде обратиться к нужному.