不知道你是不是也是使用屏幕截图的代码,把图片放到了剪切板,这个问题可以换个思路解决的,如果是可参考一下以下思路截图保存:- //双击保存截图
- 条件 #203
- // var x,y
- 变量 截图提示="截图成功"
- 鼠标获取坐标(x,y)
- 如果(pos[0][0]<x&&pos[0][1]<y&&pos[7][0]>x&&pos[7][1]>y)//判断截图范围
- 如果(复选框获取状态("放剪贴板复选框","设置"))
- SetClipboardBmp(m_sx,m_sy,m_ex,m_ey)
- 截图提示=截图提示&"已放剪贴板"
- 结束
- 截图(m_sx,m_sy,m_ex,m_ey,"c:/cut.bmp")
-
- 如果(复选框获取状态("打开图复选框","设置"))
- 图片窗口句柄=控件打开子窗口("图片窗",真)
- 图片框设置图片("图片框1","c:\\cut.bmp","图片窗")
- 变量 主窗口x,主窗口y,图片窗句柄=窗口查找("图片窗")
- 窗口设置大小(图片窗句柄,m_ex-m_sx,m_ey-m_sy+28)//这里不加28小尺度显示不正常,加上刚好
- 窗口获取位置(主窗口句柄,主窗口x,主窗口y)
- 窗口设置位置(图片窗句柄,主窗口x+398,主窗口y)
- 截图提示=截图提示&",已打开"
- 否则
- 图片窗口句柄=控件打开子窗口("图片窗",真)
- 变量 图片窗句柄=窗口查找("图片窗")
- 窗口设置大小(图片窗句柄,m_ex-m_sx,m_ey-m_sy+28)
- 图片框设置图片("图片框1","c:\\cut.bmp","图片窗")
- 结束
- 窗口关闭(m_hwnd)
- 窗口显示(主窗口句柄)
- 窗口显示(设置窗口句柄)
- 复选框设置状态("截屏复选框",假,"设置")
- 设置托盘(截图提示,真)
- 设置托盘气泡(截图提示,"操作提示:")
- //托盘气泡("操作提示:",截图提示)//有报错
- 结束
复制代码
|