我在制作软件的时候,需要关闭腾讯公司的浏览器
var aaa:thandle;
aaa:=findwindow('afx:4000:0',nil);
if aaa<>0 then 
begin
sendmessage(aaa,wm_syscommand,sc_close,0);
end;
但是每次都腾讯浏览器在关闭之前要有一个提示是否关闭,我想要系统再发一个消息给这个对话框(比如说一个回车,或者是‘y’)谁能告诉我怎样才能给这个窗口发这样的消息呢??40分给解决问题的人,up 有分。谢绝更改浏览器设置的贴子!

解决方案 »

  1.   

    sendmessage(aaa,wm_syscommand,sc_close,0);
    sleep(1000);
    sendmessage(aaa,wm_keypress,vk_enter,0);或者你直接
    sendmessage(aaa,wm_quit,0,0);
    试试
      

  2.   

    大哥,好象没有wm_keypress呀1!第一种方法pass!
    wm_quit约等于wm_syscommand,sc_close;第二种方法也不行!!
      

  3.   

    试试 :  sendmessage(aaa,wm_syscommand,sc_close,0);
      sleep(1000);
      keybd_event(VK_Return,0,0,0);
      keybd_event(VK_Return,0,KEYEVENTF_KEYUP,0);
      

  4.   

    SendMessage(aaa, WM_DESTROY, 0, 0);
      

  5.   

    楼主说: wjlsmail(计算机质子)可真厉害,我一执行程序,系统就提出腾讯浏览器执行了非法操作,然后系统就把它给关了!!呵呵,有没有更好的方法呀1!!!
      

  6.   

    在 te 的 te设置  里面有一项是 是否确认关闭浏览器,选中的时候就出现确认窗口,否则就无确认。可以在注册表中找到它的位置并予以修改。这样再关闭的时候就不会出现确认提示了。
      

  7.   

    试试sendmessage(aaa,wm_endsession,0,0);
      

  8.   

    这个可以吗?
    TerminateProcesss()
      

  9.   

    楼主,我建议你,用FindWindow() 获得那个提示是否关闭 的对话的句柄,
    然后用 GetWindowRect(h,Trect1 ); 来获得对话框中的"是" 按钮的句柄btnH
    最后向“是”按钮发送一个单击的消息SendMessage( btnH, BM_Click, 0, 0); // 即单击对话框中 "是" 按钮,这样就退出了如果,还不详细联系我 ( QQ : 160152192 )
      

  10.   


    大家好 我想问一下findwindow的用法 以及里面参数的用法 尤其第一个参数怎么应用
      

  11.   

    楼上的,自己看帮助,里面说的很清楚了Delphi自己的帮助