请问如何在程序里控制鼠标的移动(象钱龙那样)??? 没看过不过好像有SetCursorPos 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var I: Integer;begin for I := 0 to Screen.Width do begin Sleep(10); Mouse.CursorPos := Point(I, Top); end;end; 在刚安装完delphi5后,第一次运行时弹出下面的对话框:You just-in-time debugger is currently se 求助 求教,主从表删除问题? 报表提问!!! StringGird是不是有限制啊??? 在线等待,高分求救,不能见死不救呀,大侠请进!!!!! 实验室排课问题 这个怎么实现啊? 两次执行循环问题? 相同的问题!但真的很急! 說難也難,說易也易。怎樣訪問局域網內的電腦? 热切关注,只要肯触电,终究会撞出火花的!如果是真正的delphi程序员快点拿出行动吧?刚才地址有误很抱歉。
var
I: Integer;
begin
for I := 0 to Screen.Width do begin
Sleep(10);
Mouse.CursorPos := Point(I, Top);
end;
end;