Delphi中使用WebBrowser控件中载入的页面的script

使用如下语句即可：

webrowser1.OleObject.document.script.doSomething(parameter);

在网上看到还可以如下使用，不过我没用过。

uses   MSHTML;   //use   IHTMLDocument2  
   
  procedure   TForm1.BitBtn1Click(Sender:   TObject);  
  begin  
      WebBrowser1.OleObject.  
          Document.parentWindow.execScript('SayHello()',   'javascript');  
  //or  
      (WebBrowser1.Document   as   IHTMLDocument2  
          ).parentWindow.execScript('SayHello()',   'javascript')  
  end;