Z zfox Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-17 #1 如题. 详细点就是 在某个程序运行时(包括最小化时),我需要模拟鼠标移动和点击操作,但不能看到鼠标真正的移动,即不影响鼠标当前的操作.请给个简单的例子,谢谢
W wql Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-18 #3 Mouse_Event是硬性事件,不论你在哪个桌面,普通(平时用的)和登陆桌面都必须显示的! 呵呵!
Z zfox Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-18 #4 我看到有软件在 后台 运行的,可能不是从这个角度出发的,也许是从 协议上入手的,我一开始方向上可能有错误
Z zfox Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-18 #6 to 地质灾害 我用findwindow,sendmessage搞不定,你有demo版代码吗?有的话 就发我一份或者贴出来,谢谢 email:bzhu615@163.com
枝 枝上柳绵 Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-19 #7 sendmessage吧,你说的不太可能实现(你还要找要点击的位置,这点就很麻烦的) findwindow找不到就用enumwindow procedure TForm1.btn1Click(Sender: TObject); var hand:THandle; begin hand:=FindWindow(nil,PChar('Demo')); if hand=0 then Exit; SendMessage(hand,WM_SYSCOMMAND,SC_MINIMIZE,0); end;
sendmessage吧,你说的不太可能实现(你还要找要点击的位置,这点就很麻烦的) findwindow找不到就用enumwindow procedure TForm1.btn1Click(Sender: TObject); var hand:THandle; begin hand:=FindWindow(nil,PChar('Demo')); if hand=0 then Exit; SendMessage(hand,WM_SYSCOMMAND,SC_MINIMIZE,0); end;
