|
楼主 |
发表于 2023-6-5 14:50:44
|
显示全部楼层
浙江省温州市
放上相关的一些代码,几kb的图片不知道为什么上不了--------------------------------------------
.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 小熊, 小熊输入法, , "0"
.程序集变量 PgUp, 整数型
.程序集变量 PgPd, 整数型
.程序集变量 图片目录, 文本型
.程序集变量 主体功能句柄, 整数型, , "0"
.程序集变量 简便挂机句柄, 整数型, , "0"
.程序集变量 挂机模式, 整数型
.程序集变量 djys, 整数型
.程序集变量 bfys, 整数型
--------------------------------------------
.版本 2
.子程序 _窗口添加按钮_被单击
.局部变量 窗口主体, 整数型
.局部变量 窗口标题, 整数型
延时 (2222)
窗口标题 = 窗口_取鼠标处窗口句柄 ()
延时 (111)
窗口主体 = 窗口_取句柄 (窗口_取句柄 (窗口标题, , , ), , , )
延时 (111)
窗口主体列表框.加入项目 (到文本 (窗口主体), )
窗口标题列表框.加入项目 (到文本 (窗口标题), )
--------------------------------------------
.版本 2
.支持库 EThread
.子程序 _功能全程按钮_被单击
.局部变量 窗口序号, 整数型
.如果 (窗口主体列表框.现行选中项 = -1)
信息框 (“请在窗口列表中选择目标项”, 0, “提醒”, 取窗口句柄 ())
.否则
窗口序号 = 窗口主体列表框.现行选中项 + 1
启动线程 (&主体功能, , 主体功能句柄 [窗口序号])
--------------------------------------------
.版本 2
.子程序 主体功能
.局部变量 窗口句柄, 整数型
.局部变量 窗口序号, 整数型
线程_初始化COM库 ()
窗口序号 = 窗口主体列表框.现行选中项 + 1
窗口句柄 = 到整数 (窗口主体列表框.取项目文本 (窗口主体列表框.现行选中项))
小熊 [窗口序号].初始化 (取运行目录 () + “\..........dll”)
延时 (55)
.如果 (小熊 [窗口序号].取插件版本 () ≠ “”)
运行日志列表框.插入项目 (0, 时间到文本 (时间_取北京时间 (), 3) + “:” + 到文本 (窗口序号) + “窗口程序加载成功”, )
运行日志列表框.现行选中项 = 0
.否则
运行日志列表框.插入项目 (0, 时间到文本 (时间_取北京时间 (), 3) + “:” + 到文本 (窗口序号) + “窗口程序未能加载”, )
运行日志列表框.现行选中项 = 0
结束 ()
.如果结束
小熊 [窗口序号].绑定 (窗口句柄, “dx2”, “windows”, “windows”, 0)
延时 (555)
后面开始运行主程序,不会再有取句柄之类的。
补充内容 (2023-6-5 14:52):
数组在窗口创建完毕读取配置的时候有做重定义了。 |
|