开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 39518|回复: 331
收起左侧

[易语言纯源码] 编辑框改热键框模块源码

    [复制链接]

结帖率:100% (53/53)
发表于 2023-3-16 23:16:43 | 显示全部楼层 |阅读模式   福建省宁德市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
本帖最后由 帅气与大侠 于 2023-3-16 23:56 编辑


      大家在开发软件时经常需要配置众多快捷键,内置固定快捷键有时会和其他软件冲突,扩展组件库里的热键框不能用,第三方热键框支持库也有bug,论坛早期开源的一些热键框使用上也有一些局限和不便,所以花了一些时间重写了一个。
      首先易语言的窗口、组件的按下某键事件是不支持完整的小键盘按键信息的,功能上就有缺陷不完整,其次如果组件原生事件来设计,开发者就要设置按下某键、放开某键、失去焦点等事件代码,会造成很多不便。还有就是自动注册管理全局热键和窗口热键上也会增加不少代码量和负担。

      为了解决这些问题,就需要使用 SetWindowLong() 函数来接管组件的消息过程,就可以全面接管按键信息,实现全键盘快捷键支持。


目前改造的热键框实现了以下功能:

热键框支持:
1.支持组合键:Ctrl + Shift + Alt + 热键(支持小键盘按键识别)。2.支持准确的快捷键设置完成回调事件通知。
3.支持自动管理全局热键的注册和撤销,当用户设置完快捷键后内部自动进行注册,以及保存配置重启软件后也会对上次设置的热键进行自动注册,开发者不需要额外编写多余注册热键管理代码,(不需要内置的可自主使用回调事件来自行注册管理)。
4.还提供了相关的函数方法,共开发者自主注册管理热键使用


使用例子:
1.最简短的代码量,一行代码搞定。内部自动注册管理热键,热键触发会通过标签反馈事件通知

  
子程序名返回值类型公开备 注
_窗口1_创建完毕  
热键框_初始化 (窗口1, “热键框”, 0, 标签1.取窗口句柄 ())
子程序名返回值类型公开备 注
_标签1_反馈事件整数型 
参数名类 型参考可空数组备 注
参数一整数型
参数二整数型
判断 (参数一 = 热键框_取热键标识 (热键框1.取窗口句柄 ()))
调试输出 (“热键框1”)
判断 (参数一 = 热键框_取热键标识 (热键框2.取窗口句柄 ()))
调试输出 (“热键框2”)
判断 (参数一 = 热键框_取热键标识 (热键框3.取窗口句柄 ()))
调试输出 (“热键框3”)




i支持库列表   支持库注释   
spec特殊功能支持库




2.如果开发者有全局热键和局部窗口热键的需求,可采用回调事件来自主管理热键,热键注册也可使用精易模块相关命令。
  
子程序名返回值类型公开备 注
热键设置完成回调整数型 
参数名类 型参考可空数组备 注
编辑框句柄整数型
键代码整数型
功能键状态整数型
快捷键文本指针整数型指针到文本()获取
变量名类 型静态数组备 注
热键标识整数型 
快捷键文本文本型 
快捷键文本 = 指针到文本 (快捷键文本指针)
热键标识 = 热键框_取热键标识 (编辑框句柄)
如果真 (热键标识 ≠ 0)
撤销热键 (取窗口句柄 (), 热键标识)

判断 (键代码 = #退格键 键代码 = 91)
快捷键文本 = “无”

热键标识 = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 功能键状态, 键代码)
快捷键文本 = 选择 (热键标识 ≠ 0, 快捷键文本, “无”)
热键框_记录快捷键信息 (编辑框句柄, 键代码, 功能键状态, 快捷键文本, 热键标识)

SetWindowTextA (编辑框句柄, 快捷键文本)
返回 (1)


i支持库列表   支持库注释   
shellEx扩展功能支持库一


3.当软件启动时,想要自动注册应用用户上次设置的快捷键设置代码例子:

  
' 启动时先读取快捷键文本到热键框,然后初始化后就会自动注册,如果是自主注册管理热键的,初始化里提供回调指针,会呼叫该回调
批量_编辑框_读取配置 (窗口1, “config.ini”)
热键框_初始化 (窗口1, “热键框”, 0, 标签1.取窗口句柄 ())
  
' 启动时先读取快捷键文本到热键框,然后初始化后就会自动注册,如果是自主注册管理热键的,初始化里提供回调指针,会呼叫该回调
热键框1.内容 = “Ctrl + Alt Num 1”
热键框2.内容 = “Ctrl + Alt Num 2”
热键框_初始化 (窗口1, “热键框”, 0, 标签1.取窗口句柄 ())


源码下载:
热键框模块1.0.zip (20.25 KB, 下载次数: 450)

评分

参与人数 44好评 +11 精币 +58 收起 理由
薇沐啊 + 1 + 2 支持开源~!感谢分享
所咕咕咕咕 + 1 + 2 支持开源~!感谢分享
聿聿 + 1 感谢分享,很给力!~
qweipuq + 1 感谢分享,很给力!~
大兔崽子 + 1 + 2 新技能已get√
风雨3137 + 1 感谢分享,很给力!~
Mainli + 1 感谢分享,很给力!~
keyi5566 + 1 感谢分享,很给力!~
文西哥 + 1 感谢分享,很给力!~
t176 + 1 感谢分享,很给力!~
望尘莫及 + 1 感谢分享,很给力!~
Zźh926 + 1 感谢分享,很给力!~
3266167 + 1 感谢分享,很给力!~
1828902364 + 1 感谢分享,很给力!~
YzZA + 1 感谢分享,很给力!~
tszc50 + 1 希望增加对Win键的支持
周晓宇 + 1 奉上小小红包希望笑纳
小窗润轻风 + 1 支持开源~!感谢分享
LYForever + 1 + 2 这如果加入监视热键类似的功能,这个模块简直是绝杀
1329982816 + 1 + 2 YYDS~!
cbl521ysys + 1 感谢分享,很给力!~
VR非凡 + 1 感谢分享,很给力!~
pj小黑屋 + 1 感谢分享,很给力!~
aini762 + 1 开源精神必须支持~
微风已过 + 1 感谢分享,很给力!~
wa690602724 + 1 感谢分享,很给力!~
mgfz + 1 + 2 支持开源~!感谢分享
hhhql + 1 感谢分享,很给力!~
ican8 + 1 感谢分享,很给力!~
无尘666 + 1 感谢分享,很给力!~
半辈子 + 1 + 1 支持开源~!感谢分享
XXGL2005 + 1 感谢分享,很给力!~
flyk + 1 感谢分享,很给力!~
※逍遥游※ + 1 感谢分享,很给力!~
qiyuer + 1 感谢分享,很给力!~
Arui + 1 感谢分享,很给力!~
mumulu + 1 感谢分享,很给力!~
易语言资源网 + 1 + 3 开源精神必须支持~
mypursue + 1 感谢分享,很给力!~
kyo9766 + 2 感谢分享,很给力!~
大漠小鸟 + 1 大神,请收下我的膝盖
空竹 + 2 YYDS~!
qcby + 1 + 2 感谢发布原创作品,精易因你更精彩!
冰点 + 1 + 5 感谢发布原创作品,精易因你更精彩!

查看全部评分


本帖被以下淘专辑推荐:

签到天数: 5 天

发表于 2024-4-14 10:28:59 | 显示全部楼层   山东省潍坊市
绝顶好模块!
回复 支持 反对

使用道具 举报

结帖率:77% (10/13)
发表于 2024-3-21 13:44:15 | 显示全部楼层   山西省运城市
试一试效果
回复 支持 反对

使用道具 举报

结帖率:100% (25/25)

签到天数: 14 天

发表于 2024-3-19 15:47:32 | 显示全部楼层   广东省揭阳市
请问局部怎么操作呢,试了无效果。都是全局
回复 支持 反对

使用道具 举报

结帖率:100% (25/25)

签到天数: 14 天

发表于 2024-3-12 18:05:57 | 显示全部楼层   广东省揭阳市
回调怎么没有效果呢
回复 支持 反对

使用道具 举报

结帖率:100% (25/25)

签到天数: 14 天

发表于 2024-3-12 17:58:36 | 显示全部楼层   广东省揭阳市
谢谢分享,好东西
回复 支持 反对

使用道具 举报

签到天数: 8 天

发表于 2024-3-9 21:19:42 | 显示全部楼层   广东省湛江市
支持支持支持支持支持支持
回复 支持 反对

使用道具 举报

结帖率:0% (0/3)

签到天数: 21 天

发表于 2024-3-7 08:06:56 | 显示全部楼层   辽宁省大连市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:0% (0/3)

签到天数: 12 天

发表于 2024-3-7 04:42:25 | 显示全部楼层   安徽省芜湖市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

签到天数: 11 天

发表于 2024-3-4 16:44:48 | 显示全部楼层   江西省南昌市
111111111111111
回复 支持 反对

使用道具 举报

结帖率:90% (9/10)

签到天数: 22 天

发表于 2024-3-1 21:47:01 | 显示全部楼层   吉林省长春市
确实是很实用的一个东西!我是不会写!收藏了1
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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