用DELPHI实现网页的自动填充

最新推荐文章于 2025-06-12 02:55:51 发布

转载最新推荐文章于 2025-06-12 02:55:51 发布 · 2.4k 阅读

自学Delphi疑问专栏收录该内容

14 篇文章

订阅专栏

本文介绍使用Delphi通过其内置的WebBrowser组件实现自动化的Web表单填写过程，包括导航到指定网址、填写表单字段并触发按钮事件等。需要注意的是所有操作必须在页面完全加载后执行。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

基本格式如下：

procedure TForm1.Button1Click(Sender: TObject);
begin
webBrowser.navigate('http://www.83925.com');
end;

procedure TForm1.WebBrowserDocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);//请注意这个事件在页面有多个框架时会触发多次，比如网页里嵌套了两个iFrame则这个事件打开这个网页时可能会触发三次这个事件。
begin
webBrowser.OleObject.document.MailCheck.UserName.value:='83925com';//文本框
webBrowser.OleObject.document.MailCheck.MailBox.value:='65403';//下拉框
webBrowser.OleObject.document.MailCheck.Password.value:='83925com';//密码框
webBrowser.OleObject.document.MailCheck.button.click;//按钮事件
end;

必须要在WebBrowser加载完网页后再进行填充操作，否则程序找不到相应的WEB组件会报错，所以这里在WebBrowser的OnDocumentComplete事件中进行填充操作。

和JavaScript的语法类似，可以填充文本框，选择下拉框，还可以调用按钮事件，但是对一些特殊情况还不知道如何处理，比如单选和多选的值如何设定，对于TextArea的值不能用.Value来赋值了，而是要用.InnerText来设置。另个如果你操作的窗体被iFrame嵌套的话不能操作整个框架里的FORM，必须把你要操作的页面单独打开才可以。httP://www.83925.com 如果大家知道其他特殊情况的处理，请留言告诉我呀，不胜感激！！

http://greatdnl.blog.163.com/blog/static/366812722008379152915/