精易模块 BUG反馈 说明

1435990998

模块版本：【v10.3.5】
所用系统：Win11
命令名称：编码_base64解码
BUG描述：当base64编码的换行符位\n时解码换行消失，详情看图

  

调试输出 (编码_Utf8到Ansi (编码_BASE64解码 (“MTExCjIyMg==”)), “\n编码的解码结果”)
调试输出 (编码_Utf8到Ansi (编码_BASE64解码 (“MTExDQoyMjI=”)), “\r\n编码的解码结果”)

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

.版本 2<br /> .支持库 spec<br /> <br /> 调试输出 (编码_Utf8到Ansi (编码_BASE64解码 (“MTExCjIyMg==”)), “\n编码的解码结果”)<br /> 调试输出 (编码_Utf8到Ansi (编码_BASE64解码 (“MTExDQoyMjI=”)), “\r\n编码的解码结果”)

我的联系QQ：1435990998
@项目部004

y7072

模块版本：10.3.5
所用系统：win10 x64
命令名称：系统_取系统启动时间（）
BUG描述：

该命令是通过系统启动后运行的毫秒数倒推启动时间，这就出现一个问题，如果中间用户更改了电脑时间，就会导致取到的启动时间不对。建议修改成通过systeminfo取启动时间，这样不管怎么更改电脑时间，取到的依然是电脑开机那一刻的时间。

代码如下：

.版本 2

.子程序 系统_取系统启动时间_精准版, 日期时间型, 公开
.局部变量 执行结果, 文本型

执行结果 ＝ 系统_取DOS执行结果 (“wmic path Win32_OperatingSystem get LastBootUpTime”, )
' LastBootUpTime

' 20220819201428.500000+480


执行结果 ＝ 子文本替换 (执行结果, “ ”, “”, , , 真)
' 删除返回结果中的空格


执行结果 ＝ 子文本替换 (执行结果, #换行符, “”, , , 真)
' 删除返回结果中的换行符

返回 (到时间 (取文本中间 (执行结果, 16, 14)))





我的联系QQ：7072588

@项目部004

yab8012

模块版本：9.4及以上版本
所用系统：Windows 7
命令名称：系统_取wai网IP（）
BUG描述：IP取不出来，编译出来，程序会卡顿，网页_取wai网IP（）能取出来
我的联系QQ：1013890206

@项目部004

雷文顿

模块版本：精易模块[v10.3.5]
所用系统：Windows 10 企业版 LTSC 21H2 19044.1387 Windows Feature Experience Pack 120.2212.3920.0
命令名称：程序_显示托盘图标()
BUG描述：软件加进去没有任何效果
我的联系QQ：29967071

@项目部004

mwqy19

模块版本：10.3.5
所用系统：Win10 64位
命令名称：类_通用对话框中的。选择字体
BUG描述：取消或关闭窗口后原本单元格中的字体信息会变成默认的初始状态。可以把如果真改成如果，如果真字体信息=选择的，如果假字体名称为空，这样可以用返回的字体空判断是确定修改还是取消修改，
我的联系QQ：

@项目部004

784326742

线程_dll卸载没效果，你拿任务管理器试试就知道了
附例子：

  

窗口程序集名	保 留	保 留	备 注
(未填写程序集名)
变量名	类 型	数组	备 注
变量名	类 型	数组	备 注
集_模块	进程_模块信息	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
i	整数型
id	整数型

id ＝ 进程_名取ID (“taskmgr.exe”)
进程_枚举进程模块 (id, 集_模块)
计次循环首 (取数组成员数 (集_模块), i)
如果真 (到小写 (集_模块 .模块文件名) ＝ “uxtheme.dll”)
线程_DLL卸载 (id, 集_模块 .模块文件名)

计次循环尾 ()

.版本 2<br /> <br /> .程序集变量 集_模块, 进程_模块信息, , "0"<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 id, 整数型<br /> <br /> <br /> id ＝ 进程_名取ID (“taskmgr.exe”)<br /> 进程_枚举进程模块 (id, 集_模块)<br /> .计次循环首 (取数组成员数 (集_模块), i)<br />     .如果真 (到小写 (集_模块 .模块文件名) ＝ “uxtheme.dll”)<br />         线程_DLL卸载 (id, 集_模块 .模块文件名)<br />     .如果真结束<br /> <br /> <br /> .计次循环尾 ()

784326742

线程_dll卸载没效果，你拿任务管理器试试就知道了
附例子：

  

窗口程序集名	保 留	保 留	备 注
(未填写程序集名)
变量名	类 型	数组	备 注
变量名	类 型	数组	备 注
集_模块	进程_模块信息	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
i	整数型
id	整数型

id ＝ 进程_名取ID (“taskmgr.exe”)
进程_枚举进程模块 (id, 集_模块)
计次循环首 (取数组成员数 (集_模块), i)
如果真 (到小写 (集_模块 .模块文件名) ＝ “uxtheme.dll”)
线程_DLL卸载 (id, 集_模块 .模块文件名)

计次循环尾 ()

.版本 2<br /> <br /> .程序集变量 集_模块, 进程_模块信息, , "0"<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 id, 整数型<br /> <br /> <br /> id ＝ 进程_名取ID (“taskmgr.exe”)<br /> 进程_枚举进程模块 (id, 集_模块)<br /> .计次循环首 (取数组成员数 (集_模块), i)<br />     .如果真 (到小写 (集_模块 .模块文件名) ＝ “uxtheme.dll”)<br />         线程_DLL卸载 (id, 集_模块 .模块文件名)<br />     .如果真结束<br /> <br /> <br /> .计次循环尾 ()

784326742

命令：类_外部选择夹
1：初始化选择夹，如果再次初始化返回假，并且不能操作
2：win10 选择夹的 置标题和取标题等命令会导致外部选择夹崩溃
win10开个任务管理器测试就知道了
还有能不能增加个 子夹排序？ 比如 子夹3 换到 子夹2

单排练心态

模块版本：10.3.5以及历史版本
所用系统：win10 64位
命令名称：批量_编辑框_读取配置（）
BUG描述：编辑框清空后，读取配置异常
我的联系QQ：

错误重现方法：
如图所示，编辑框本来内置的有内容。
当用户清空这个编辑框，然后保存的时候，保存内容为空。
-----
[编辑框]
编辑框1=
-------
这时候，根据旧版代码，载入配置信息后，编辑框内容会是：999，而不是空。
代码严谨点，应该是判断这个编辑框1的配置项是否存在，如果不存在，说明用户还没有保存过，就不载入。如果用户曾经保存过，就根据信息直接载入。



修复代码：

  

子程序名	返回值类型	公开	备 注
批量_编辑框_读取配置k	整数型		与"批量_编辑框_保存配置()"命令一起用的!  返回被操作的编辑框数量!
参数名	类 型	参考	可空	数组	备 注
组件的父窗口	窗口				直接填写顶级窗口就行了,如:_启动窗口
配置文件名	文本型				可空:默认保存在根目录\data目录下,名为setsoft.ini

变量名	类 型	静态	数组	备 注
局_寻找句柄	整数型
局_计次	整数型
局_组件	编辑框
局_组件数量	整数型
局_临时文本	文本型
局_文本	文本型

如果真 (配置文件名 ＝ “”)
配置文件名 ＝ 取默认目录 ()
局_寻找句柄 ＝ 寻找组件 (组件的父窗口, , “编辑框”, , )
局_组件数量 ＝ 取找到组件数目 (局_寻找句柄)
局_文本 ＝ 到文本 (读入文件 (配置文件名))  ' 增加代码
计次循环首 (局_组件数量, 局_计次)
局_组件 ＝ 取所找到组件 (局_寻找句柄, 局_计次 － 1)
局_临时文本 ＝ 读配置项 (配置文件名, “编辑框”, 取组件名称 (局_组件), )
如果真 (局_临时文本 ＝ “” 且 寻找文本 (局_文本, 局_临时文本 ＋ “=”, , 假) ＝ -1)  ' 找不到这个配置项，并且内容为空，就不做处理。 如果只是内容为空，但是能找到这个编辑框，还是要载入的。
到循环尾 ()
局_临时文本 ＝ 子文本替换 (局_临时文本, “>
<”, #换行符, , , 真)
局_组件.内容 ＝ 子文本替换 (局_临时文本, “#引号”, #引号, , , 真)
计次循环尾 ()
清除组件寻找句柄 (局_寻找句柄)
返回 (局_组件数量)

.版本 2<br /> <br /> .子程序 批量_编辑框_读取配置k, 整数型, 公开, 与"批量_编辑框_保存配置()"命令一起用的!  返回被操作的编辑框数量!<br /> .参数 组件的父窗口, 窗口, , 直接填写顶级窗口就行了,如:_启动窗口<br /> .参数 配置文件名, 文本型, 可空, 可空:默认保存在根目录\data目录下,名为setsoft.ini<br /> .局部变量 局_寻找句柄, 整数型<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_组件, 编辑框<br /> .局部变量 局_组件数量, 整数型<br /> .局部变量 局_临时文本, 文本型<br /> .局部变量 局_文本, 文本型<br /> <br /> .如果真 (配置文件名 ＝ “”)<br />     配置文件名 ＝ 取默认目录 ()<br /> .如果真结束<br /> 局_寻找句柄 ＝ 寻找组件 (组件的父窗口, , “编辑框”, , )<br /> 局_组件数量 ＝ 取找到组件数目 (局_寻找句柄)<br /> <br /> 局_文本 ＝ 到文本 (读入文件 (配置文件名))  ' 增加代码<br /> <br /> .计次循环首 (局_组件数量, 局_计次)<br />     局_组件 ＝ 取所找到组件 (局_寻找句柄, 局_计次 － 1)<br /> <br /> <br /> <br />     局_临时文本 ＝ 读配置项 (配置文件名, “编辑框”, 取组件名称 (局_组件), )<br /> <br /> <br />     .如果真 (局_临时文本 ＝ “” 且 寻找文本 (局_文本, 局_临时文本 ＋ “=”, , 假) ＝ -1)  ' 找不到这个配置项，并且内容为空，就不做处理。 如果只是内容为空，但是能找到这个编辑框，还是要载入的。<br />         到循环尾 ()<br />     .如果真结束<br />     局_临时文本 ＝ 子文本替换 (局_临时文本, “><br /> <”, #换行符, , , 真)<br />     局_组件.内容 ＝ 子文本替换 (局_临时文本, “#引号”, #引号, , , 真)<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (局_寻找句柄)<br /> 返回 (局_组件数量)

修复方法2：
配置文件不存在，就直接不处理，配置文件存在，才执行载入配置。

  

子程序名	返回值类型	公开	备 注
批量_编辑框_读取配置k	整数型		与"批量_编辑框_保存配置()"命令一起用的!  返回被操作的编辑框数量!
参数名	类 型	参考	可空	数组	备 注
组件的父窗口	窗口				直接填写顶级窗口就行了,如:_启动窗口
配置文件名	文本型				可空:默认保存在根目录\data目录下,名为setsoft.ini

变量名	类 型	静态	数组	备 注
局_寻找句柄	整数型
局_计次	整数型
局_组件	编辑框
局_组件数量	整数型
局_临时文本	文本型
局_是否存在	文本型

如果真 (配置文件名 ＝ “”)
配置文件名 ＝ 取默认目录 ()
局_寻找句柄 ＝ 寻找组件 (组件的父窗口, , “编辑框”, , )
局_组件数量 ＝ 取找到组件数目 (局_寻找句柄)
局_是否存在 ＝ 文件是否存在 (配置文件名)
如果真 (局_是否存在 ＝ 真)  ' 配置文件存在，就直接载入，不存在就不考虑
计次循环首 (局_组件数量, 局_计次)
局_组件 ＝ 取所找到组件 (局_寻找句柄, 局_计次 － 1)
局_临时文本 ＝ 读配置项 (配置文件名, “编辑框”, 取组件名称 (局_组件), )
局_临时文本 ＝ 子文本替换 (局_临时文本, “>
<”, #换行符, , , 真)
局_组件.内容 ＝ 子文本替换 (局_临时文本, “#引号”, #引号, , , 真)
计次循环尾 ()
清除组件寻找句柄 (局_寻找句柄)

返回 (局_组件数量)

.版本 2<br /> <br /> .子程序 批量_编辑框_读取配置k, 整数型, 公开, 与"批量_编辑框_保存配置()"命令一起用的!  返回被操作的编辑框数量!<br /> .参数 组件的父窗口, 窗口, , 直接填写顶级窗口就行了,如:_启动窗口<br /> .参数 配置文件名, 文本型, 可空, 可空:默认保存在根目录\data目录下,名为setsoft.ini<br /> .局部变量 局_寻找句柄, 整数型<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_组件, 编辑框<br /> .局部变量 局_组件数量, 整数型<br /> .局部变量 局_临时文本, 文本型<br /> .局部变量 局_是否存在, 文本型<br /> <br /> .如果真 (配置文件名 ＝ “”)<br />     配置文件名 ＝ 取默认目录 ()<br /> .如果真结束<br /> 局_寻找句柄 ＝ 寻找组件 (组件的父窗口, , “编辑框”, , )<br /> 局_组件数量 ＝ 取找到组件数目 (局_寻找句柄)<br /> <br /> 局_是否存在 ＝ 文件是否存在 (配置文件名)<br /> <br /> .如果真 (局_是否存在 ＝ 真)  ' 配置文件存在，就直接载入，不存在就不考虑<br />     .计次循环首 (局_组件数量, 局_计次)<br />         局_组件 ＝ 取所找到组件 (局_寻找句柄, 局_计次 － 1)<br /> <br /> <br /> <br />         局_临时文本 ＝ 读配置项 (配置文件名, “编辑框”, 取组件名称 (局_组件), )<br /> <br /> <br />         局_临时文本 ＝ 子文本替换 (局_临时文本, “><br /> <”, #换行符, , , 真)<br />         局_组件.内容 ＝ 子文本替换 (局_临时文本, “#引号”, #引号, , , 真)<br />     .计次循环尾 ()<br />     清除组件寻找句柄 (局_寻找句柄)<br /> <br /> <br /> .如果真结束<br /> <br /> 返回 (局_组件数量)

dat恶人

模块版本：10.1.5及以上
所用系统：Windows10
命令名称：系统_取DOS执行结果()
BUG描述：无法使用系统'msg'命令
易语言截图:

正常cmd截图:

或到腾讯文档窗口截图:https://docs.qq.com/doc/DWWNtYmh0aldQZ3hy
我的联系QQ：206988071

@项目部004