procedure showJs();
begin
//这句意思是WebBrowser执行wb里js脚本返回的值。wb里有个js方法叫getAllPass
showmessage(wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001'));
end;procedure Tform_Main.btn_FailClick(Sender: TObject);
var
id:dword;
begin
showJs();//在主线程里是可以正确执行的。
CreateThread(nil,0,@showJs,nil,0,id);//在多线程里 就会出现这个异常 (Access violation at address 68A98099 in module 'mshtml.dll'. Read of address 000001EC)
end;{我就是想,在多线程里执行 wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001')获取,我想要的值,但是就是出现以上异常。。快一天了。百度/google都没搞定。只能来csdn拜托大牛了!小弟谢谢啦!怎么解决?}
begin
//这句意思是WebBrowser执行wb里js脚本返回的值。wb里有个js方法叫getAllPass
showmessage(wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001'));
end;procedure Tform_Main.btn_FailClick(Sender: TObject);
var
id:dword;
begin
showJs();//在主线程里是可以正确执行的。
CreateThread(nil,0,@showJs,nil,0,id);//在多线程里 就会出现这个异常 (Access violation at address 68A98099 in module 'mshtml.dll'. Read of address 000001EC)
end;{我就是想,在多线程里执行 wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001')获取,我想要的值,但是就是出现以上异常。。快一天了。百度/google都没搞定。只能来csdn拜托大牛了!小弟谢谢啦!怎么解决?}
解决方案 »
- Fastreport 打印自定义纸张,都会先走一张空白纸,请教。
- 找qreport教程!
- 请问如何STRINGGRID中的列表CELL(1,1)添加下拉列表框.
- 谁有关于delphiX控件的相关帮助文档及例子啊?谢谢!
- 字符转换的问题
- 高分求助!olecontainer焦点问题
- 从本地数据库上传数据至远程SQL Server速度的奇怪问题。
- 如何禁止用户移动窗口
- 窗口最大化的问题
- 客户端是不是一定要用TclientDataset,直接用TadoDataset修改服务器地址不行吗?这两者有什么区别,请高手帮忙。
- (求助)关于AlphaControls设置中文语言的问题
- 如何解决 ImageEnMIO 扫描速度慢啊?
uses ActiveX;
procedure showJs();
begin
coInitialize(nil);
try
//这句意思是WebBrowser执行wb里js脚本返回的值。wb里有个js方法叫getAllPass
showmessage(wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001'));
finally
CoUninitialize;
end;
end;
老大,这个我加过了呀。不行呢。~~~~~ 我只是把我代码简化下,这个就类似小demo,加了还是出现相同的异常!
大能!!
wb.OleObject.document.parentWindow.getAllPass('dsfsdfsdf','dssaas2','DDAWDDSDASD','010001')中调用时有问题传递参数错误或者是无法获取的主线中的某些资源。那么关键性的问题就可能存在于这个wb.OleObject.document.parentWindow 这个windows是不是存在? 你可以考虑使用其他技术。