TC官方合作论坛

标题: 读写配置外加一个循环求解答啊- - [打印本页]
作者: 头疼宁    时间: 2012-12-26 11:26
标题: 读写配置外加一个循环求解答啊- -
我按钮这么设置后每点击一下可以存一个账号密码，怎么更改可以规定存的数目，比如上限20个账号，另外初始化中怎么将账号密码读出到列表框

功能 逻辑型 按钮0_点击()
字符型 文本=按钮.获得文本("按钮0")
选择(文本)
条件 "添加账号":
窗口.设置焦点(控件.获得句柄("编辑框0"))
按钮.设置文本("按钮0","确认")

条件 "确认":
如果(编辑框.获得文本("编辑框0")==""||编辑框.获得文本("编辑框1")==""||编辑框.获得文本("编辑框2")=="")
辅助.消息框("账号密码及昵称不能为空")
编辑框.设置文本("编辑框0","")
编辑框.设置文本("编辑框1","")
编辑框.设置文本("编辑框2","")
否则
角色=编辑框.获得文本("编辑框2")//属性名
辅助.写配置(角色,"账号",编辑框.获得文本("编辑框0"),配置路径)
辅助.写配置(角色,"密码",编辑框.获得文本("编辑框1"),配置路径)
下拉框.增加文本("下拉框0",编辑框.获得文本("编辑框2"))
列表框.增加文本("列表框0",编辑框.获得文本("编辑框0"))
列表框.增加文本("列表框1",编辑框.获得文本("编辑框1"))
        辅助.消息框("添加成功")
编辑框.设置文本("编辑框0","")
编辑框.设置文本("编辑框1","")
编辑框.设置文本("编辑框2","")
条件 "添加账号":
窗口.设置焦点(控件.获得句柄("编辑框0"))
按钮.设置文本("按钮0","确认")
作者: fire    时间: 2012-12-26 13:21
代码如下:
源代码+界面设计如下...
[attach]6928[/attach]

  2. 空间 测试
  3. //默认空间
  4. 功能 添加信息()
  5.     if(下拉框.得到个数("下拉框0")>20)
  6.         辅助.消息框("Sorry,最多20个角色信息","提示信息")
  7.         return false
  8.     endif
  9.     选择(按钮.获得文本("按钮0"))
  10.         条件 "确认":
  11.         变量 角色 = 编辑框.获得文本("编辑框0")
  12.         变量 帐号 = 编辑框.获得文本("编辑框1")
  13.         变量 密码 = 编辑框.获得文本("编辑框2")
  14.         if(角色 == ""||帐号 == ""||密码 == "")
  15.             辅助.消息框("帐号密码及昵称不能为空...","提示信息")
  16.         else        
  17.             下拉框.增加文本("下拉框0",角色)
  18.             列表框.增加文本("列表框0","帐号:"&帐号)
  19.             列表框.增加文本("列表框0","密码:"&密码)
  20.             列表框.增加文本("列表框0","------------------")
  21.             辅助.写配置(角色,"帐号",帐号,".\\abc.ini")
  22.             辅助.写配置(角色,"密码",密码,".\\abc.ini")
  23.         endif
  24.         编辑框.设置文本("编辑框0","")
  25.         编辑框.设置文本("编辑框1","")
  26.         编辑框.设置文本("编辑框2","")
  27.         按钮.设置文本("按钮0","添加信息")
  28.         条件 "添加信息":
  29.         窗口.设置焦点(控件.获得句柄("编辑框0"))
  30.         按钮.设置文本("按钮0","确认")
  31.     选择结束
  32. 功能结束
  33. 功能 显示()
  34.     变量 内容 = 下拉框.获得文本("下拉框0")
  35.     标签.设置文本("标签3","昵称:"&内容&"\n帐号:"&辅助.读配置(内容,"帐号",".\\abc.ini")&"\n密码:"&辅助.读配置(内容,"密码",".\\abc.ini"))
  36.    
  37. 功能结束
  38. 功能 按钮0_点击()
  39.     线程.开启("测试.添加信息","")
  40. 功能结束
  41. 功能 销毁()
  42.     //这里添加你要执行的代码
  43.     for(i=0; i<下拉框.得到个数("下拉框0"); i++)
  44.         变量 内容 = 下拉框.获得内容("下拉框0",i)
  45.         辅助.写配置("昵称",i,内容,".\\abc.ini")
  46.     endfor
  47. 功能结束
  48. 功能 初始化()
  49.     //这里添加你要执行的代码
  50.     for(i=0; i<20; i++)
  51.         内容 = 辅助.读配置("昵称",i,".\\abc.ini")
  52.         if(内容!="")
  53.             下拉框.增加文本("下拉框0",内容)
  54.             列表框.增加文本("列表框0","帐号:"&辅助.读配置(内容,"帐号",".\\abc.ini"))
  55.             列表框.增加文本("列表框0","密码:"&辅助.读配置(内容,"密码",".\\abc.ini"))
  56.             列表框.增加文本("列表框0","------------------")
  57.         endif
  58.     endfor
  59. 功能结束
  60. 功能 下拉框0_选择改变()
  61.     //这里添加你要执行的代码
  62.     线程.开启("测试.显示","")
  63. 功能结束
  64. 空间结束
  65. //空间结束语句
复制代码

作者: 头疼宁    时间: 2012-12-26 13:42
回复 2楼fire的帖子

这个是4.0新版本的吧= =
没有新版本= =
作者: fire    时间: 2012-12-26 13:57
回复 3楼头疼宁的帖子

官网下载......现在有的..........昨天才更新
作者: 头疼宁    时间: 2012-12-26 15:38
回复 4楼fire的帖子

下了，但是我找不到你的配置文件在哪 - -新的感觉用不来了。。。
作者: fire    时间: 2012-12-26 16:36
回复 5楼头疼宁的帖子

生成文件夹里面撒

代码的路径是".\\abc.ini"是程序所在的路径
作者: 头疼宁    时间: 2012-12-26 19:06
回复 6楼fire的帖子

坑爹的是没有啊！！！但是能读出来。。。这难道是bug？
作者: fire    时间: 2012-12-26 20:28
回复 7楼头疼宁的帖子

生成文件夹会有一个abc.ini的文件
作者: 头疼宁    时间: 2012-12-27 08:19
回复 8楼fire的帖子

照理应该有的，问题是真没有。。。倒是能读出来，好神奇。。。可能新版本存在的一些bug。。。不过新的tc不会用了呢，再学习中。。。
作者: fire    时间: 2012-12-27 08:59
回复 9楼头疼宁的帖子

这个真的有....
你调试程序的时候打开生成文件夹的那个EXE程序


再有问题QQ1194090052



欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1