1、控制WebBrowser实际上就是控制IE，最简单的方法就是执行javascript或vbscript，省去了接口的转换。
如何执行脚本？以前我一直用mshtml中IHTMLWindow2接口的execScript()方法，在Delphi中需要uses MSHTML单元：

usesMSHTML;

procedureTForm1.Button1Click(Sender: TObject);
begin
   (WebBrowser1.Document   as  IHTMLDocument2).parentWindow.execScript('alert("hello");','javascript')
end;

2、用WebBrowser的Navigate()方法更简单：

procedureTForm1.Button1Click(Sender: TObject);
begin
   WebBrowser1.Navigate('javascript:alert("hello");')
end;

省去了添加引用的麻烦。