delphiWebBrowser的使用方法详解

1、delphi WebBrowser 的使用方法详解(四)delphi WebBrowser 的使用方法详解(四) -webbrowser 轻松实现自动填表分类： Delphi Webbrowser TembeddedWB 2013-11-01 17:02 220 人阅读 评论 (0) 收藏 举报目录(?)+webbrowser 轻松实现自动填表步骤如下：第一步：获取网页 调用 Webbrowser 的 Navigate 系列函数。 等待网页装载完成，得到 document 对象。 在调用 webBrowser.Document 之前，请确保 Webbrowser 网页装载 完成，可以通过 We

2、bbrowser 的 DocumentCompleted 事件进 行监视。 小技巧 先指定一个变量步骤如下：第一步：获取网页调用 Webbrowser 的 Navigate 系列函数。 等待网页装载完成， 得到 document 对象。在调用 webBrowser.Document 之前，请确保 Webbrowser 网 页装载完成，可以通过 Webbrowser 的 DocumentCompleted 事件进行监视。小技巧先指定一个变量：IsCompleted在调用 Webbrowser 的 Navigate ，Refresh 系列函数之前，将 IsCompleted 设为 false。在

3、DocumentCompleted 事件中，如果 ReadyState 为 WebBrowserReadyState.Complete（ 值为 4），则设 IsCompleted 为 true.调用 webBrowser.Document 之前对 IsCompleted 进行判断。如果不为true,则延时循环等待，直到IsCompleted被设为true.第二步：设置网页元素数据确保得到 document 对象之后， 通过 GetElementById 获取网 页元素，如：HtmlElement user = webBrowser.Document.GetElementById(user);H

4、tmlElement password =webBrowser.Document.GetElementById(password); 设置网页元素值：user.InnerText = myname; password.InnerText = 123456;小技巧作用 SetAttribute 设置下拉框，复选框，多选框数据 下拉框：secret.SetAttribute(value, question1); 复选框rememberme.SetAttribute(Checked, True); 多选框cookietime.SetAttribute(checked, checked);当然，在 S

5、etAttribute 之前， 也可以用 GetAttribute 取相关的 属性先进行判断，再根椐需要进行设置。第三步：提交网页数据 先取提交的按钮对象。 HtmlElement submit = webBrowser.Document.GetElementById(submit);进行提交submit.InvokeMember(click);就是怎么简单。整个过程也就是http get 和 post 的过程。当然也可以用低级点的 WebRequest,还有更低级的socket 来做，不过，现在的众多页面都有这样， 那样的变形验证码， 如果你和我一样, 搞不定验证码识别, 又贪图快点完成任务

6、, 上面的办法绝对是又快,又好。webbrowser通过属性(tag)遍历查找元素function GetDocLinkByHref(doc :IHTMLDocument2;str_url:string):IHTMLAnchorElement; vari: Integer;label_iDispatch : iDispatch;label_element : IHTMLAnchorElement;beginResult := nil;doc := webbrowser1.document as Ihtmldocument2; if not Assigned(doc) thenExit;for i:=0 to doc.links.length-1 dobeginlabel_iDispatch := doc.links.item(i,0); label_element := doc.links.item(I,0) asIHTMLAnchorElement;if (AnsiPos(str_url,(doc.links