捕捉全屏图像
来源:互联网 发布:仓库管理系统源码 编辑:程序博客网 时间:2024/04/28 21:21
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); end;var Form1: TForm1;implementation{$R *.dfm}//捕捉全屏幕图像并保存到: c:\temp\Screen.bmpprocedure TForm1.Button1Click(Sender: TObject);var bit: TBitmap; DC: HDC; cvs: TCanvas;begin bit := TBitmap.Create; bit.SetSize(Screen.Width, Screen.Height); DC := GetDC(0); cvs := TCanvas.Create; cvs.Handle := DC; bit.Canvas.CopyRect(Screen.DesktopRect, cvs, Screen.DesktopRect); bit.SaveToFile('c:\temp\Screen.bmp'); ReleaseDC(0, DC); cvs.Free; bit.Free;end;end.
0 0
- 捕捉全屏图像
- 捕捉全屏图像
- Delphi 捕捉全屏幕图像
- 捕捉一个图像
- iOS捕捉图像
- PicPick (图像捕捉/截图/处理)
- 实时捕捉图像的播放
- OpenCV之摄像头捕捉图像
- 使用UIWebView播放视频时捕捉全屏播放事件
- Java实现图像全屏显示
- C++ builder 家用摄像头捕捉图像
- DircteSHow采集视频图像捕捉…
- 自定义相机设置捕捉图像区域
- 用OpenCV库函数捕捉图像上传FTP服务器
- ubuntu在“屏幕捕捉”图像上添加一个阴影
- 如何捕捉图像并保存在文件夹中
- 利用Qt与OpenCV简单实现摄像头图像捕捉
- VS2008+MFC+opencv 显示视频图像/捕捉摄像头视频界面
- 限制UITextField只接收数字输入
- HTTP协议的C语言编程实现实例
- 几个IOS比较炫的效果
- 两年.net码农总结
- Labview中串口通讯的研究
- 捕捉全屏图像
- 尼康轻便型相机COOLPIX S系列新机发布
- OOC源码(三)
- Error -27727: Step download timeout (120 seconds) has expired when downloading
- Java日志系统框架的设计与实现
- Eclipse中Jquery等js文件报错的解决办法
- Scriptlet笔记1
- Vbscript在DataGridView中折半查找某一行
- Oracle 创建用户 修改用户密码 授权命令