组合框自动记录

程序集名	保留	保留	备注
组合框自动记录			公开
变量名	类型	数组	备注
记录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声明
版权声明	本文为博主原创文章，未经博主允许不得转载。