关于网友提出的“ 如何移动鼠标?”问题疑问,本网通过在网上对“ 如何移动鼠标?”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:
问题: 如何移动鼠标?描述:
我在程序里调用了messagebox,我想同时将鼠标移动到messagebox上,请问如何移动?何时移动?
解决方案1:
messagebox一定是在屏幕正中间,多测试几下,就能移上去了
解决方案2:估计是要把那个messagebox关了吧,可以用findwindow捕捉到这个messagebox 的句柄,然后用sendmessage(messagebox的句柄,wm_close,0,0);
解决方案3: procedure TForm1.Button1Click(Sender: TObject);
var w,h:integer;
begin
w:=trunc(screen.Width/2);
h:=trunc(screen.Height/2);
setcursorpos(w,h);
showmessage('鼠标在message窗口上');
end;
gl