DELPHI中访问WEBBROWSER控件中的HTML元素

虽然没有C#那么多封装好了的方法，但是也可以用以下方式轻松实现对某HTML元素内容的访问。procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant); var wb : TWebBrowser; newNumber : Integer; begin wb := Sender as TWebBrowser; if Assigned(wb.Document) then begin //wb.OleObject.Document.Body.Scroll := 'no'; try newNumber := StrToInt(wb.OleObject.Document.All.MaxID.value); showmessage(wb.OleObject.Document.All.MaxID.value); except end; end; end; 

非常简单，只需要一句话就像在页面用JS访问一样直接获取MaxID控件的值。提醒一下，如果你想在DELPHI中用智能提示来完成此代码是不可能的。