在抓图是怎样还mouse的指针一起抓? 在抓图是怎样还mouse的指针一起抓? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 抓图得时候把鼠标先Hide,在得出画板得大小,在启动程序抓图,得到得图片就没有鼠标了,不过抓完图记得释放鼠标. "抓图的时候记住鼠标指针的坐标和形状,回放的时候重新画"还有其它方法吗??这个方法,,是不是不太好,,,nnhg说的方法不抓mouse指针,我要的是我抓到的图片上有mouse的指针 抓取当前鼠标形状 (转载) 萧萧 2001-12-26 11:53:10 这样抓取当前鼠标形状:先定义一个cursor变量:var GlobalCur:TIcon; windowhld:hwnd; threadld:dword;begin windowhld:=GetForegroundWindow; threadld:=GetWindowThreadProcessId(Windowhld,nil); AttachThreadInput(GetCurrentThreadId,threadld,true); GlobalCur:=TIcon.Create; GlobalCur.handle:=GetCursor; AttachThreadInput(GetCurrentThreadId,threadld,false);然后bitmap.canvas.brush.Style:=bsclear;bitmap.canvas.draw(x,y,GlobalCur); //x,y的值可以通过GetCursorPos得到 那位大哥知道怎么从adoquery中读取一条记录,存放在TStringList中? 关于集合类型,怎判断一字符串是否在一个集合里 什么原因呀,晕 Delphi2006的重大BUG 怎么去掉或更改FastReport默认图标 用DELPHI写OFFICE的问题(和线程有关)——————高分提问!!答对再加100 onkeydown事件 求教Delphi的MediaPlayer控件为啥不能在WIN98以后播放VCD .DAT文件 玩完了,救救俺吧,散分!!!! 小问题 winexec或其他api隐藏着打开一个外部程序,如何做? 如何用进度条显示下载进度?
还有其它方法吗??这个方法,,是不是不太好,,,
nnhg说的方法不抓mouse指针,我要的是我抓到的图片上有mouse的指针
萧萧 2001-12-26 11:53:10
这样抓取当前鼠标形状:先定义一个cursor变量:
var GlobalCur:TIcon;
windowhld:hwnd;
threadld:dword;
begin
windowhld:=GetForegroundWindow;
threadld:=GetWindowThreadProcessId(Windowhld,nil);
AttachThreadInput(GetCurrentThreadId,threadld,true);
GlobalCur:=TIcon.Create;
GlobalCur.handle:=GetCursor;
AttachThreadInput(GetCurrentThreadId,threadld,false);
然后
bitmap.canvas.brush.Style:=bsclear;
bitmap.canvas.draw(x,y,GlobalCur); //x,y的值可以通过GetCursorPos得到