打开 ie 新方法 哈哈 http://bbs.csdn.net/topics/1172 非常有用

这里有一个从德国下载的资料。不过我自己也没有试过，不知道有没有帮助。

...den Internet Explorer mit OLE steuern ? 

uses comobj; 

procedure OpenIE(aURL: string); 
var 
  IE        : Variant; 
  WinHanlde : HWnd;  
begin  
  if( VarIsEmpty(IE) )then 
  begin  
    IE := CreateOleObject('InternetExplorer.Application'); 
    IE.Visible := true;  
    IE.Navigate(aURL); 
  end  
  else  
  begin  
    WinHanlde := FindWIndow('IEFrame', nil); 
    if (0 <> WinHanlde) then 
    begin  
      IE.Navigate(aURL);  
      SetForegroundWindow(WinHanlde);  
    end  
    else 
      ShowMessage('Can''t open IE !'); 
  end; 
end;  

procedure TForm1.Button1Click(Sender: TObject); 
begin 
  OpenIE('http://www.swissdelphicenter.ch'); 
end;