求助!webbrowser自动提交表单的问题!

peipei160509 2008-04-08 09:14:35
求助!webbrowser自动提交表单的问题!
webbrowser自动提交表单的问题!
在一个事件里面,为什么打开网页,紧接着提交表单会出错呢?
这个问题如何解决啊?
procedure TForm1.Button1Click(Sender: TObject);
var
Doc:IHTMLDocument2;
input:OleVariant;
userinputelement,pwdinputelement:ihtmlinputelement;

begin
webbrowser1.Navigate('http://www.......com/.....');
doc:=webbrowser1.document as ihtmldocument2;
userinputelement:=(doc.all.item('Email',0) as ihtmlinputelement);
userinputelement.value:=‘abcld’;
................
end;

上面的例子就是,,我是在一个事件里打开网页,另一个事件填写表单 才解决这个问题;

可是如何在一个事件里 就能先打开网页后提交表单呢??

先谢谢大家了!
...全文
89 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
pengxuan 2008-04-09
可以把提交代码写在
onDocumentComplete事件里,这是等网页装载完成后触发的事件
回复
踢踏 2008-04-09
问题在于网页尚未打开,下一步的提交动作已经开始了,这样当然出错了。

WebBrowser1.Navigate(Url);
while WebBrowser1.ReadyState < READYSTATE_COMPLETE do
Application.ProcessMessages;
doc:=webbrowser1.document as ihtmldocument2;
回复
相关推荐
发帖
网络通信/分布式开发
创建于2007-08-02

1573

社区成员

Delphi 网络通信/分布式开发
申请成为版主
帖子事件
创建了帖子
2008-04-08 09:14
社区公告
暂无公告