procedure TForm1.Button1Click(Sender: TObject);
var
ie: hwnd;
begin
ie:=FindWindow('Microsoft Internet Explorer', nil);
SetWindowText(ie, '123');
end;

Не могу понять чего еще не хватает!?