另类方式实现Snipaste贴图的取消置顶

呓语丶

Snipaste是我用过除QQ截图外   最好用的截图贴图工具
而且他的免费版功能也非常丰富了
但是   but
我唯独只需要一个贴图取消置顶的会员功能
但为了这个功能去花99大洋  还是觉得有点亏
所以就出现了这个东西
代码不多   原理如下:
用LordPE为32位版本的Snipaste导入我的一个dll   功能很简单   打开Snipaste后自动运行一个exe

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

运行 (取运行目录 () ＋ “\k.exe”, 假, )
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 返回值被忽略。

子程序名	返回值类型	公开	备 注
k

返回 ()

子程序名	返回值类型	公开	备 注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

.版本 2<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br /> <br /> 运行 (取运行目录 () ＋ “\k.exe”, 假, )<br /> <br /> <br /> _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br /> 返回 (0)  ' 返回值被忽略。<br /> <br /> .子程序 k, , 公开<br /> <br /> 返回 ()<br /> <br /> .子程序 _临时子程序<br /> <br /> ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

这个exe的功能也很简单:  监视按键,按下自定义的快捷键后,对Snipaste的贴图窗口进行是否置顶的操作

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
集_窗口句柄	整数型

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

变量名	类 型	静态	数组	备 注
进程	精易_进程信息数组		0
i	整数型
数量	整数型

窗口_监视热键_注册 (&置顶操作)
' //  防多开
进程_取系统进程列表 (进程)
计次循环首 (取数组成员数 (进程), i)
如果真 (进程 [i].进程名称 ＝ 取执行文件名 ())
数量 ＝ 数量 ＋ 1

计次循环尾 ()
如果真 (数量 ＞ 1)
结束 ()

' //  Snipaste不存在自动结束
判断循环首 (真)
如果真 (取反 (进程_是否存在 (“Snipaste.exe”, )))
结束 ()
程序_延时 (1000, )
判断循环尾 ()
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 返回值被忽略。

子程序名	返回值类型	公开	备 注
置顶操作
参数名	类 型	参考	可空	数组	备 注
功能键	整数型
键代码	整数型
按键状态	整数型				1为按下，2为放开

变量名	类 型	静态	数组	备 注
局_窗口句柄	整数型

如果真 (键代码 ＝ #D键 )  ' //   快捷键可自定义
如果真 (按键状态 ＝ 1)  ' //  按下
局_窗口句柄 ＝ 窗口_取鼠标处窗口句柄 ()
' //  Snipaste贴图窗口标题统一为   Paster - Snipaste
如果真 (窗口_取标题 (局_窗口句柄) ＝ “Paster - Snipaste”)
判断 (窗口_是否置顶 (局_窗口句柄))
' //   直接在dll调用该函数会导致Snipaste进程崩溃   所以曲线救国
SetWindowPos (局_窗口句柄, -2, 0, 0, 0, 0, 3)
SetWindowPos (局_窗口句柄, -1, 0, 0, 0, 0, 3)

子程序名	返回值类型	公开	备 注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

.版本 2<br /> <br /> .程序集 程序集1<br /> .程序集变量 集_窗口句柄, 整数型<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br /> .局部变量 进程, 精易_进程信息数组, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 数量, 整数型<br /> <br /> 窗口_监视热键_注册 (&置顶操作)<br /> <br /> ' //  防多开<br /> 进程_取系统进程列表 (进程)<br /> <br /> .计次循环首 (取数组成员数 (进程), i)<br /> <br />     .如果真 (进程 <i>.进程名称 ＝ 取执行文件名 ())<br />         数量 ＝ 数量 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (数量 ＞ 1)<br />     结束 ()<br /> .如果真结束<br /> <br /> ' //  Snipaste不存在自动结束<br /> .判断循环首 (真)<br /> <br />     .如果真 (取反 (进程_是否存在 (“Snipaste.exe”, )))<br />         结束 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br /> .判断循环尾 ()<br /> <br /> _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br /> 返回 (0)  ' 返回值被忽略。<br /> <br /> .子程序 置顶操作<br /> .参数 功能键, 整数型<br /> .参数 键代码, 整数型<br /> .参数 按键状态, 整数型, , 1为按下，2为放开<br /> .局部变量 局_窗口句柄, 整数型<br /> <br /> .如果真 (键代码 ＝ #D键)  ' //   快捷键可自定义<br />     .如果真 (按键状态 ＝ 1)  ' //  按下<br />         局_窗口句柄 ＝ 窗口_取鼠标处窗口句柄 ()<br />         ' //  Snipaste贴图窗口标题统一为   Paster - Snipaste<br />         .如果真 (窗口_取标题 (局_窗口句柄) ＝ “Paster - Snipaste”)<br />             .判断开始 (窗口_是否置顶 (局_窗口句柄))<br />                 ' //   直接在dll调用该函数会导致Snipaste进程崩溃   所以曲线救国<br />                 SetWindowPos (局_窗口句柄, -2, 0, 0, 0, 0, 3)<br />             .默认<br />                 SetWindowPos (局_窗口句柄, -1, 0, 0, 0, 0, 3)<br />             .判断结束<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .如果真结束<br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> .子程序 _临时子程序<br /> <br /> ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

代码的注释写的非常清楚了,源码可以直接黑月编译   编译之后仅24kb  外部程序运行只占用1.3M内存   非常nice
附送一个汉化版的LordPE   及添加导入表的教程
快没币了   坑你们点币
LordPE_汉化版.zip (628.97 KB, 下载次数: 6)

2023-7-27 00:13 上传

点击文件名下载附件 源码.zip (277.73 KB, 下载次数: 4)

2023-7-27 00:14 上传

点击文件名下载附件

rbp2008

支持开源~！感谢分享

ax5038

感谢分享

qqmqqg

利好了，牛市要来了，加油！

jia201314973

精易论坛龙

感谢分享

jysoft2022

支持开源~！感谢分享

亿万

支持开源~！感谢分享

深圳梦

支持开源~！感谢分享

呓语丶

bianyuan456 发表于 2023-7-28 01:53
用了楼主的loadpe_hh
Snipaste-1.16.2-x64 ，在添加导入表提示
此功能当前不支持PE32+格式文件

必须32位的Snipaste才行