社区
Delphi
帖子详情
如何在程序运行时,在屏幕上出现一个抓取的矩形框,类似一般的抓图软件。
LinLei
2003-09-30 09:50:49
如何在程序运行时,在屏幕上出现一个抓取的矩形框,类似一般的抓图软件。最好给个源码事例。
...全文
43
5
打赏
收藏
如何在程序运行时,在屏幕上出现一个抓取的矩形框,类似一般的抓图软件。
如何在程序运行时,在屏幕上出现一个抓取的矩形框,类似一般的抓图软件。最好给个源码事例。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
47522341
2003-09-30
打赏
举报
回复
是不是要在mousemove事件里自己绘制一个图框;^_^,
tom20803862
2003-09-30
打赏
举报
回复
兄弟,做这个另类的程序做啥用啊! 我没做过,但提个馊主意: 做个有边缘中间透明的窗口吧!做各种各样的窗口书上很多,定可做到的
IORILI
2003-09-30
打赏
举报
回复
截取屏幕指定区域,
代码如下:
procedure TClient.ScreenCap(LeftPos,TopPos,
RightPos,BottomPos:integer);
var
RectWidth,RectHeight:integer;
SourceDC,DestDC,Bhandle:integer;
Bitmap:TBitmap;
begin
RectWidth:=RightPos-LeftPos;
RectHeight:=BottomPos-TopPos;
SourceDC:=CreateDC('DISPLAY','','',nil);
DestDC:=CreateCompatibleDC(SourceDC);
Bhandle:=CreateCompatibleBitmap(SourceDC,
RectWidth,RectHeight);
SelectObject(DestDC,Bhandle);
BitBlt(DestDC,0,0,RectWidth,RectHeight,SourceDC,
LeftPos,TopPos,SRCCOPY);
Bitmap:=TBitmap.Create;
Bitmap.Handle:=BHandle;
BitMap.SaveToStream(BmpStream);
BmpStream.Position:=0;
LeftSize:=BmpStream.Size;
Bitmap.Free;
DeleteDC(DestDC);
ReleaseDC(Bhandle,SourceDC);
end;
S.F.
2003-09-30
打赏
举报
回复
先copy 屏幕到窗体,窗体大小和屏幕一样大,然后用鼠标画框
kejian
2003-09-30
打赏
举报
回复
取一屏幕当前图像。
建一个全屏最大化无边框窗体。
在窗体中自画。
C#开发实例大全(基础卷).
软件
开发技术联盟(带详细书签) PDF 下载
实例158 设置窗体在
屏幕
中的位置 208 实例159 从上次关闭位置启动窗体 209 实例160 始终在桌面最顶层显示的窗体 210 7.2 设置窗体大小 211 实例161 限制窗体大小 211 实例162 根据桌面大小调整窗体大小 212 实例163 ...
linux系统里常用的
抓图
工具,linux下很棒的
抓图
工具——scrot
在
屏幕
抓取
工具的选择上,我首选gimp,颇研究了一番,但gimp用于
抓图
总觉得大材小用,而且也不很方便,譬如无法进行区域交互
抓取
,只能抓窗口或整屏,然后在gimp环境中用裁剪工具获取所需图像区域。今天,又搜索了...
十种
屏幕
抓取
方法
一、PrintScreen按键+画图工具 不论你使用的是台式机还是笔记本电脑,在键盘上都有
一个
PrintScreen按键,但是很多用户不知道它是干什么用的,其实它就是
屏幕
抓图
的“快门”!当按下它以后,系统会自动将当前全屏画面...
屏幕
抓图
至少分为3个步骤:
屏幕
抓图
至少分为3个步骤: (1) 启用鼠标指针捕获。 (2) 在鼠标指针所在处的窗口进行绘图,提示... (1)在Visual C++ .NET中按照GDI+
程序
的框架新建
一个
基于对话框的项目ScreenCapture,然后准备好
一个
外形
利用Delphi的Tbitmap控件
抓取
屏幕
图象
相信绝大部分电脑爱好者都使用过不同种类的
抓图
软件
抓取
屏幕
图形。...
程序
的主要思路是:当按下为窗口建立的热键后,首先获得光标所在的窗口的矩形区域,然后建立
一个
TBitmap对象,将矩形区域复制到T
Delphi
5,391
社区成员
262,736
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章