程序集名 | 保留 | 保留 | 备注 |
组合框自动记录 | 公开 | ||
变量名 | 类型 | 数组 | 备注 |
记录url | 文本型 | ||
账号记录 | 文本型 | 0 | |
T | 整数型 |
子程序名 | 返回值类型 | 公开 | 备注 | ||
初始化 | 当基于本类的对象被创建后,此方法会被自动调用 |
记录url = 取运行目录 () + “\gudong.dll” |
调试输出 (记录url) |
T = 创建进入许可证 () |
子程序名 | 返回值类型 | 公开 | 备注 | ||
销毁 | 当基于本类的对象被销毁前,此方法会被自动调用 |
清除数组 (账号记录) |
删除进入许可证 (T) |
子程序名 | 返回值类型 | 公开 | 备注 | ||
读取信息 | 逻辑型 |
| 填充下拉 成功返回真,失败返回假 | ||
参数名 | 类型 | 参考 | 可空 | 数组 | 备注 |
组合框 | 组合框 |
变量名 | 类型 | 静态 | 数组 | 备注 |
i | ||||
历史集合 | 文本型 | |||
Temp历史 | 文本型 | 0 |
进入许可区 (T) |
历史集合 = 到文本 (读入文件 (记录url)) |
账号记录 = 分割文本 (历史集合, #换行符, ) |
组合框.清空 () |
退出许可区 (T) |
计次循环首 (取数组成员数 (账号记录), i) |
Temp历史 = 分割文本 (账号记录 [i], “)(”, ) |
如果真 (取数组成员数 (Temp历史) < 1) |
返回 (假) |
如果真结束 |
组合框.加入项目 (Temp历史 [1], ) |
计次循环尾 () |
返回 (真) |
子程序名 | 返回值类型 | 公开 | 备注 | ||
取数据 | 文本型 |
| 成功返回 索引数据,失败返回空 | ||
参数名 | 类型 | 参考 | 可空 | 数组 | 备注 |
索引 | 整数型 |
如果真 (索引 + 1 ≤ 取数组成员数 (账号记录)) |
返回 (账号记录 [索引 + 1]) |
如果真结束 |
返回 (“”) |
子程序名 | 返回值类型 | 公开 | 备注 | ||
保存信息 | 逻辑型 |
| 保存返回真,存在返回假 【)(】分割 | ||
参数名 | 类型 | 参考 | 可空 | 数组 | 备注 |
账号信息 | 文本型 | 唯一 标识[主键] | |||
附加信息 | 文本型 |
| 附加信息 |
变量名 | 类型 | 静态 | 数组 | 备注 |
i | ||||
y | 是否有历史 0.没有 1.有 | |||
Temp历史 | 文本型 | 0 | ||
账号字节集 | 字节集 | |||
uaerinfo | 文本型 | |||
历史集合 | 文本型 | |||
临时账号 | 字节集 |
进入许可区 (T) |
历史集合 = 到文本 (读入文件 (记录url)) |
账号记录 = 分割文本 (历史集合, #换行符, ) |
计次循环首 (取数组成员数 (账号记录), i) |
Temp历史 = 分割文本 (账号记录 [i], “)(”, ) |
如果真 (取数组成员数 (Temp历史) < 1) |
返回 (假) |
如果真结束 |
如果真 (Temp历史 [1] = 账号信息) |
y = 1 |
如果真结束 |
计次循环尾 () |
退出许可区 (T) |
如果真 (y = 0) |
账号字节集 = 读入文件 (记录url) |
uaerinfo = 账号信息 + “)(” + 附加信息 + #换行符 |
调试输出 (“写入数据”, uaerinfo) |
临时账号 = 到字节集 (uaerinfo) |
写到文件 (记录url, 账号字节集 + 临时账号) |
返回 (真) |
如果真结束 |
返回 (假) |
i本程序使用的支持库列表 | |
spec | (特殊功能支持库) |
EThread | (多线程支持库) |
i声明 | |
版权声明 | 本文为博主原创文章,未经博主允许不得转载。 |