网站首页 > 易语言相关 > 易语言模块源码 正文
资源介绍:
增强型特殊快照模块源码例程程序调用API函数实现特殊快照效果。
点评:易语言增强型特殊快照模块源码可以截取dx游戏窗口和透明窗口。
资源作者:
易语言我吃了
资源界面:
.版本 2 .子程序 快照_特殊增强, 字节集, 公开, 能将Dx游戏窗口或者透明窗口的图像截取出来。※注:GIF输出最快,BMP最慢但质量最好,PNG较快质量也较好。 .参数 输出格式, 整数型, 可空, 1.BMP;2.JPG;3.GIF;4.TIFF;5.PNG,留空默认为BMP。 .参数 窗口句柄, 整数型, 可空 .参数 输出宽度, 整数型, 可空 .参数 输出高度, 整数型, 可空 .局部变量 n, 整数型 .局部变量 TempFormat, 整数型 .局部变量 Value, 整数型 .局部变量 TempGlobal_1, 整数型 .局部变量 TempGlobal_2, 整数型 .局部变量 Format, 整数型, , "0" .局部变量 hGlobal, 整数型, , "0" .局部变量 hThread, 整数型 .局部变量 hBitmap, 整数型 .局部变量 hScrDC, 整数型 .局部变量 hScrMemDC, 整数型 .局部变量 hWinBitmap, 整数型 .局部变量 hWinDC, 整数型 .局部变量 hWinMemDC, 整数型 .局部变量 RECT, 整数型, , "4" .局部变量 Width, 整数型 .局部变量 Height, 整数型 .局部变量 DataStream, 对象 .局部变量 pStream, 整数型 .局部变量 Bitmap, 整数型 .局部变量 hMemData, 整数型 .局部变量 Data, 字节集 .如果真 (OpenClipboard (0) = 0 或 是否为空 (窗口句柄) = 假 且 IsWindow (窗口句柄) = 0) 返回 ({ }) .如果真结束 TempFormat = EnumClipboardFormats (0) .判断循环首 (TempFormat ≠ 0) 加入成员 (Format, TempFormat) TempGlobal_1 = GetClipboardData (TempFormat) Value = GlobalSize (TempGlobal_1) TempGlobal_2 = GlobalAlloc (8194, Value) CopyMemory1 (GlobalLock (TempGlobal_2), GlobalLock (TempGlobal_1), Value) GlobalUnlock (TempGlobal_1) GlobalUnlock (TempGlobal_2) 加入成员 (hGlobal, TempGlobal_2) ' 本源码来自三叶资源网(www.sanye.cx) DeleteObject (TempGlobal_1) TempFormat = EnumClipboardFormats (TempFormat) .判断循环尾 () EmptyClipboard () CloseClipboard () keybd_event (44, 0, 0, 0) keybd_event (44, 0, 2, 0) 处理事件 () OpenClipboard (0) Value = GetClipboardData (2) .如果真 (Value = 0) CloseClipboard () keybd_event (17, 0, 0, 0) keybd_event (18, 0, 0, 0) keybd_event (107, 0, 0, 0) keybd_event (107, 0, 2, 0) keybd_event (17, 0, 2, 0) keybd_event (18, 0, 2, 0) 处理事件 () OpenClipboard (0) Value = GetClipboardData (2) .如果真结束 ' 本源码来自三叶资源网(www.sanye.cx) .如果真 (是否为空 (窗口句柄) = 假) GetWindowRect (窗口句柄, RECT) hScrDC = GetDC (0) hScrMemDC = CreateCompatibleDC (hScrDC) DeleteObject (SelectObject (hScrMemDC, Value)) hWinDC = GetDC (窗口句柄) hWinMemDC = CreateCompatibleDC (hWinDC) Width = RECT [3] - RECT [1] Height = RECT [4] - RECT [2] hWinBitmap = CreateCompatibleBitmap (hWinDC, Width, Height) DeleteObject (SelectObject (hWinMemDC, hWinBitmap)) BitBlt (hWinMemDC, 0, 0, Width, Height, hScrMemDC, RECT [1] - 1, RECT [2] - 1, 13369376) ' 本源码来自三叶资源网(www.sanye.cx) ReleaseDC (0, hScrDC) ReleaseDC (0, hWinDC) DeleteDC (hScrMemDC) DeleteDC (hWinMemDC) DeleteObject (Value) Value = hWinBitmap .如果真结束 .如果 (是否为空 (输出高度) = 假 且 是否为空 (输出宽度) = 假) hBitmap = CopyImage (Value, 0, 输出宽度, 输出高度, 4) DeleteObject (Value) .否则 hBitmap = Value .如果结束 GdipCreateBitmapFromHBITMAP (hBitmap, 0, Bitmap) CreateStreamOnHGlobal (0, 真, DataStream) CopyMemory2 (pStream, DataStream, 4) .如果真 (输出格式 < 1 或 输出格式 > 5) 输出格式 = 1 .如果真结束 GdipSaveImageToStream (Bitmap, pStream, 多项选择 (输出格式, { 0 }, { 1 }, { 2 }, { 5 }, { 6 }) + { 244, 124, 85, 4, 26, 211, 17, 154, 115, 0, 0, 248, 30, 243, 46 }, 0) GetHGlobalFromStream (pStream, hMemData) Data = 指针到字节集 (GlobalLock (hMemData), GlobalSize (hMemData)) GlobalUnlock (hMemData) GdipDisposeImage (Bitmap) GlobalFree (hMemData) DeleteObject (hBitmap) EmptyClipboard () .计次循环首 (取数组成员数 (Format), n) SetClipboardData (Format [n], hGlobal [n]) GlobalFree (hGlobal [n]) .计次循环尾 () CloseClipboard () ' 本源码来自三叶资源网(www.sanye.cx) 返回 (Data)
资源下载:
- 上一篇: 广连达易语言注册源码
- 下一篇: 集中营易语言视频教程
猜你喜欢
- 2023-10-09 定时执行任务模块(Metr_定时执行任务[Majo])
- 2023-02-13 讯飞文本识别鉴权与文字识别源码
- 2022-04-07 大漠插件免费版3.1233的中文版模块
- 2022-04-05 易语言log日志模块源码
- 2022-03-13 易语言TCP客户端模块 支持SSL
- 2021-12-23 队长自动化测试模块2.96
- 2021-12-12 判断电脑是否开启VT虚拟化(你的cpu虚拟化特性vt没有开启)
- 2021-12-01 Echarts商业级数据图表库模块v1.7.0.328【模块及示例大全】
- 2021-11-27 动态添加选择夹子夹例程源码
- 2021-11-14 配置项加密读写源码
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
本文暂时没有评论,来添加一个吧(●'◡'●)