为什么我一个函数在主线程工作没问题再开个线程运行程序就崩溃了啊!(100)

  • 主题发起人 主题发起人 hksoobe
  • 开始时间 开始时间
H

hksoobe

Unregistered / Unconfirmed
GUEST, unregistred user!
就下面这个函数我再开个线程出来运行的话程序就崩溃了!procedure TForm1.in_(const ausername,apw:string);var do
c: IHTMLDocument3;
Element: IHTMLElement;
begin
do
c := Form1.WebBrowser1.Document as IHTMLDocument3;
Element :=do
c.getElementById('login_email');
(Element as IHTMLInputElement).value := ausername;
Element :=do
c.getElementById('login_password');
with (Element as IHTMLInputElement)do
begin
value := apw;
form.submit;
end;
end;
 
你的form.submit也是WebBrowser1中的吧.在你运行这句后,WebBrowser1中的内容已经改变.
 
明白了线程同步一下就可以了Synchronize谢谢!马上给分!
 
没明白你意思嘛!可以说清楚点嘛!谢谢!
 
后退
顶部