我循环用webbrowser访问了一个页面,由于这个页面在onunload里写了一个“是否关闭”的确认框,每次访问到这都需要我手动点击确定,如果我没点确定,下次再访问会提示“此资源正在使用中。”,请问能不能在webbrowser里屏蔽这个事件让他不弹出或者自动确认而不需要我手工点击。资源正在使用浏览器
解决方案 »
- 我想删除指定文件夹下所有的文件,请问代码怎么写?
- 动态生成的TfrMemoView,我该怎么控制它的小数位数?
- 报这样的错:BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
- 考考你对Object Pascal的面对对象知识。
- 在websnap技术中,delphi也有一个自带的,可以从网页上提取数据的例子,我看不明白,请高手帮忙解答。
- 怎么样发送系统的TAB消息?
- 在一个循环里面用try except ,如何发生错误后不让整个循环束
- 一个char型数组中每8位中均装有16进制数据,如何将其转换成整型数据?(100分)
- 将数据倒入excel用ole的createoleobject在那个单元亚?还有那有excelapplication???
- 小鸟继续求助:使自己的程序在系统后台运行,无论在桌面还是系统托盘都看不见 !!!
- QQ 终结者
- 求教GroupBox1的控制属性问题
var
hChild: HWND;
begin
Result := True;
if GetParent(H) = HMainForm then
begin
hChild := FindWindowEx(H, 0, PChar('Button'), PChar('确定'));
if hChild > 0 then
SendMessage(hChild, BM_Click, 0, 0);
end;
end;拖一个TTimer到程序上,然后定义其Timer事件如下:
procedure TfrmMain.tmr1Timer(Sender: TObject);
begin
EnumWindows(@CallBackProc, Self.Handle);
end;时间设定个500就行。出来就自动确定了。
begin
wb1.Silent:=True;
end;
// 不过这样会屏蔽所有的js弹出的消息框
const pDisp: IDispatch; var URL: OleVariant);
begin
WebBrowser1.OleObject.document.parentWindow.execScript('window.confirm=function(){return true}', 'javascript')
end;