很实用的易语言模块查看器

易语言 2020-08-06 10:44:41

很实用的易语言模块查看器

.判断开始 (取数组成员数 (公开DLL) ≠ 0)
索引 = 树型框1.加入项目 (, “DLL命令”, 4, , , , )
加入成员 (nr, “DLL命令”)
.计次循环首 (取数组成员数 (公开DLL), c)
索引2 = 树型框1.加入项目 (索引, 公开DLL [c].名称, 4, , , , )
程序集 = “”
.计次循环首 (取数组成员数 (公开DLL [c].参数组), c1)
程序集 = 程序集 + “.参数 ” + 公开DLL [c].参数组 [c1].名称 + “, ” + 公开DLL [c].参数组 [c1].数据类型 + “, 传址(” + 到文本 (公开DLL [c].参数组 [c1].传址) + “), 数组(” + 到文本 (公开DLL [c].参数组 [c1].数组) + “), ” + 公开DLL [c].参数组 [c1].备注 + #换行符
.计次循环尾 ()
加入成员 (nr, “.DLL命令 ” + 公开DLL [c].名称 + “, ” + 公开DLL [c].返回类型 + “, ” + #引号 + 公开DLL [c].文件名 + #引号 + “, ” + #引号 + 公开DLL [c].命令名 + #引号 + “, 公开, ” + 公开DLL [c].备注 + #换行符 + 程序集)
.计次循环尾 ()
.默认

.判断结束
.判断开始 (取数组成员数 (公开常量) ≠ 0)
索引 = 树型框1.加入项目 (, “常量”, 9, , , , )
加入成员 (nr, “常量”)
.计次循环首 (取数组成员数 (公开常量), c)
树型框1.加入项目 (索引, 公开常量 [c].名称, 9, , , , )
加入成员 (nr, “.常量 ” + 公开常量 [c].名称 + “, ” + #引号 + 到文本 (公开常量 [c].数据.取文本 ()) + #引号 + “, 公开, ” + 公开常量 [c].备注)
.计次循环尾 ()