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

[peipei160509]

求助！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;

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

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

先谢谢大家了！

[踢踏]

问题在于网页尚未打开，下一步的提交动作已经开始了，这样当然出错了。

WebBrowser1.Navigate(Url);
while WebBrowser1.ReadyState < READYSTATE_COMPLETE do
Application.ProcessMessages;
doc:=webbrowser1.document as ihtmldocument2;

[pengxuan]

可以把提交代码写在
onDocumentComplete事件里,这是等网页装载完成后触发的事件