精易论坛

标题: 选择组合框读取相应的账号密码到编辑框 [打印本页]

作者: longxp    时间: 2022-3-10 18:56
标题: 选择组合框读取相应的账号密码到编辑框
今天在论坛里找了一下,发现都没有太简单的组合框读取置相应的编辑框密码,
基本上都是读取配置项,比较麻烦,自己写了一个,比较简单,希望对大家有用吧.
组合框读取密码.rar (306.17 KB, 下载次数: 28)

  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
_组合框_账号_鼠标左键被按下逻辑型 
参数名类 型参考可空数组备 注
横向位置整数型
纵向位置整数型
功能键状态整数型
变量名类 型静态数组备 注
账号数据文本型 
_分割文本文本型0
i整数型 
账号密码文本型0
x整数型 
组合框_账号.清空 ()
账号数据 = 到文本 (读入文件 (取运行目录 ()“\账号.txt”))
_分割文本 = 分割文本 (账号数据, #换行符, )
计次循环首 (取数组成员数 (_分割文本), i)
账号密码 = 分割文本 (_分割文本 [i], “|”, )
组合框_账号.加入项目 (删首尾空 (账号密码 [1]), )
计次循环尾 ()
子程序名返回值类型公开备 注
_组合框_账号_列表项被选择  
变量名类 型静态数组备 注
账号文本型 
账号数据文本型 
_分割文本文本型0
i整数型 
账号密码文本型0
账号 = 组合框_账号.取项目文本 (组合框_账号.现行选中项)
账号数据 = 到文本 (读入文件 (取运行目录 ()“\账号.txt”))
_分割文本 = 分割文本 (账号数据, #换行符, )
计次循环首 (取数组成员数 (_分割文本), i)
账号密码 = 分割文本 (_分割文本 [i], “|”, )
如果真 (账号 = 账号密码 [1])
编辑框_密码.内容 = 删首尾空 (账号密码 [2])

计次循环尾 ()


作者: xjshuaishuai    时间: 2022-3-10 21:21
谢谢分享!
作者: 灵感吖    时间: 2022-3-11 00:00
学习看看哦
作者: aaa88888    时间: 2022-3-11 00:04

作者: 凉忆亦凉心    时间: 2022-3-11 00:33
支持一下
作者: itoljeipw    时间: 2022-3-11 08:32
谢谢分享!
作者: 396384183    时间: 2022-3-11 10:21

作者: reveriexue    时间: 2022-3-11 11:20

作者: 星空Allstar    时间: 2022-3-11 15:00
谢谢楼主分享
作者: gaoqing    时间: 2022-3-12 16:27
谢谢分享
作者: lishengliang    时间: 2022-3-12 20:47
66666666666666666666
作者: itoljeipw    时间: 2022-3-16 21:53
谢谢楼主分享
作者: qwe8890    时间: 2022-4-21 18:31
支持开源~!感谢分享
作者: 夕昕    时间: 2022-4-28 23:33
感谢分享,为楼主点赞




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4