开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 168|回复: 1
打印 上一主题 下一主题
收起左侧

[易语言] 如何缩略图截图

[复制链接]
结帖率:54% (21/39)
跳转到指定楼层
楼主
发表于 11 小时前 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式   湖北省黄冈市
14精币
DwmUpdateThumbnailProperties映射后,如何后台截取其内容图片?

  
DLL命令名返回值类型公开备 注
略缩图_创建整数型 返回0为成功
DLL库文件名:
Dwmapi.dll
在DLL库中对应命令名:
DwmRegisterThumbnail
参数名类 型传址数组备 注
目标窗口整数型
源窗口整数型
略缩图ID整数型略缩图指针
DLL命令名返回值类型公开备 注
略缩图_更新整数型 返回0为成功
DLL库文件名:
Dwmapi.dll
在DLL库中对应命令名:
DwmUpdateThumbnailProperties
参数名类 型传址数组备 注
略缩图ID整数型略缩图指针
略缩图属性略缩图属性
DLL命令名返回值类型公开备 注
略缩图_销毁 
DLL库文件名:
Dwmapi.dll
在DLL库中对应命令名:
DwmUnregisterThumbnail
参数名类 型传址数组备 注
略缩图ID整数型略缩图指针



回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:89% (39/44)

签到天数: 9 天

沙发
发表于 6 小时前 | 只看该作者   河北省衡水市
  
窗口程序集名保 留  保 留备 注
后台截图程序集   
变量名类 型数组备 注
hWnd整数型        ' 目标窗口句柄  
hThumb整数型      ' DWM 缩略图句柄  
pThumbPropsDWM_THUMBNAIL_PROPERTIES  ' 缩略图属性  

子程序名返回值类型公开备 注
_启动子程序整数型 
变量名类 型静态数组备 注
截图结果逻辑型 
' 1. 获取目标窗口句柄(这里以记事本为例,请替换成你的目标窗口)
hWnd = 取窗口句柄 (“Notepad”, “无标题 - 记事本”)
如果 (hWnd = 0)
信息框 (“未找到目标窗口!”, 0, , )
返回 (0)
' 2. 初始化 GDI+
Gdip初始化 ()

' 3. 注册 DWM 缩略图
如果 (DwmRegisterThumbnail (hWnd, 取桌面窗口句柄 (), hThumb) ≠ 0)
信息框 (“DwmRegisterThumbnail 失败!”, 0, , )
返回 (0)
' 4. 设置缩略图属性(调整大小、位置等)
pThumbProps.dwFlags := #DWM_TNP_RECTDESTINATION | #DWM_TNP_VISIBLE | #DWM_TNP_OPACITY
pThumbProps.opacity := 255  ' 不透明
pThumbProps.fVisible :=   ' 可见
pThumbProps.rcDestination.左边 := 0
pThumbProps.rcDestination.顶边 := 0
pThumbProps.rcDestination.右边 := 800  ' 缩略图宽度
pThumbProps.rcDestination.底边 := 600  ' 缩略图高度

' 5. 更新缩略图
DwmUpdateThumbnailProperties (hThumb, pThumbProps)

' 6. 截图并保存
截图结果 = 截图缩略图并保存 (“C:\thumb.png”)
如果 (截图结果)
信息框 (“截图成功!保存到 C:\thumb.png”, 0, , )
信息框 (“截图失败!”, 0, , )

' 7. 释放缩略图
DwmUnregisterThumbnail (hThumb)

' 8. 关闭 GDI+
Gdip关闭 ()
返回 (0)
子程序名返回值类型公开备 注
截图缩略图并保存逻辑型 
参数名类 型参考可空数组备 注
保存路径文本型
变量名类 型静态数组备 注
hdcScreen整数型 
hdcMem整数型 
hBitmap整数型 
oldBmp整数型 
rectRECT 
width整数型 
height整数型 
pBitmap整数型 
pGraphics整数型 
' 1. 获取窗口尺寸
取窗口矩形 (hWnd, rect)
width := rect.右边 - rect.左边
height := rect.底边 - rect.顶边

' 2. 创建内存 DC 和位图
hdcScreen = 取设备场景 (0)
hdcMem = 创建兼容设备场景 (hdcScreen)
hBitmap = 创建兼容位图 (hdcScreen, width, height)
oldBmp = 选择对象 (hdcMem, hBitmap)

' 3. 从缩略图复制到内存位图
BitBlt (hdcMem, 0, 0, width, height, hdcScreen, 0, 0, #SRCCOPY )

' 4. 使用 GDI+ 保存为 PNG
GdipCreateBitmapFromHBITMAP (hBitmap, 0, pBitmap)
GdipCreateFromHDC (hdcMem, pGraphics)
GdipSaveImageToFile (pBitmap, 保存路径, “image/png”, 0)

' 5. 清理资源
GdipDisposeImage (pBitmap)
GdipDeleteGraphics (pGraphics)
删除对象 (hBitmap)
删除设备场景 (hdcMem)
删除设备场景 (hdcScreen)

返回 ()
数据类型名公开备 注
DWM_THUMBNAIL_PROPERTIES 
成员名类 型传址数组备 注
dwFlags整数型  
rcDestinationRECT  
rcSourceRECT  
opacity字节型  
fVisible逻辑型  
fSourceClientAreaOnly逻辑型  
数据类型名公开备 注
RECT 
成员名类 型传址数组备 注
左边整数型  
顶边整数型  
右边整数型  
底边整数型  



i支持库列表   支持库注释   
shellEx扩展功能支持库一
gdiplus(未知支持库)

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表