玩了将近半年TC了.共享一个快速保存配置的代码

warcraftii

个人原创 谈不上一键保存. 但是比自己每个控件都手动敲代码要好多了. 不说多了,分享一下.


控件的命名规则必须如此不然没法使用:   控件类型_控件名称_子界面名称
例子1(控件在主窗口上,不是在子窗口的):比如一个用来记录账号的编辑框       编辑框_账号   就这样子.不需要最后的_子窗口
例子2:(控件在子界面上) 假如子界面名称叫"子界面1"那么就是      编辑框_账号_子界面1 这样必须加上子界面名称
另外控件必须用控件类型开头.不然不好判断类型 下面是代码 分3步
1.     加入控件到控件组(控件名称)  把你界面上的控件一个个的加入
2.     全部加入完了用 一键保存配置()  保存配置 .保存路径是程序目录下 名称叫配置.ini
3.     界面载入的时候使用 一键读取配置() 就可以全部读出来啦.
另外有一些不常用的控件没有加入,只加入了常用的.需要的自己搞
最后,打个广告 老瓜工作室 接辅助脚本制作 联系QQ 194527277

1. 空间 快速保存配置
   
2. 
   
3. 控件组 = 数组[0]
   
4. 
   
5. 功能 一键读取配置()
   
6.         path = 系统.获取程序路径() & "配置.ini"
   
7.         如果( 文件.是否存在(path) == 假)
   
8.                 返回 假
   
9.         如果结束
   
10.         str
    
11.         字符串.分割(文件.读文件(path),"\r\n",str)
    
12.         len
    
13.         数组空间.大小(str,len)
    
14.         遍历(i=0;i<len;i++)
    
15.                 如果( 字符串.查找字符串(str[i],"=") >= 0)
    
16.                         tmp,tlen,父窗口
    
17.                         字符串.分割(str[i],"_",tmp)
    
18.                         控件类型 = tmp[0]
    
19.                         控件名 = 字符串.截取(str[i],0,字符串.查找字符串(str[i],"="))
    
20.                         数组空间.大小(tmp,tlen)
    
21.                         如果(tlen >= 3)
    
22.                                 父窗口 = tmp[2]
    
23.                         否则
    
24.                                 父窗口 = ""
    
25.                         如果结束
    
26.                         选择(控件类型)
    
27.                                 条件 "编辑框":          //编辑框:设置内容
    
28.                                 tmp = 辅助.读配置(控件名,控件名,path)
    
29.                                 编辑框.设置文本(控件名,tmp,父窗口)
    
30.                                 
    
31.                                 条件 "浏览框":         //浏览框:设置内容
    
32.                                 tmp = 辅助.读配置(控件名,控件名,path)
    
33.                                 浏览框.设置(控件名,tmp,父窗口)
    
34.                                 
    
35.                                 条件 "复选框":        //复选框:设置选中状态
    
36.                                 tmp = 辅助.读配置(控件名,控件名,path)
    
37.                                 如果(tmp == "-1")
    
38.                                         复选框.选中(控件名,真,父窗口)
    
39.                                 否则
    
40.                                         复选框.选中(控件名,假,父窗口)
    
41.                                 如果结束
    
42.                                 
    
43.                                 条件 "下拉框":        //下拉框:保存选中序号
    
44.                                 tmp = 辅助.读配置(控件名,控件名,path)
    
45.                                 下拉框.设置选项(控件名,tmp,父窗口)
    
46.                                 
    
47.                                 条件 "列表框":        //列表框:保存选中序号
    
48.                                 tmp = 辅助.读配置(控件名,控件名,path)
    
49.                                 列表框.设置选项(控件名,tmp,父窗口)
    
50.                         选择结束
    
51.                 如果结束
    
52.         遍历结束
    
53.         
    
54. 功能结束
    
55. 
    
56. 
    
57. 
    
58. 功能 一键保存配置()
    
59.         len
    
60.         数组空间.大小(控件组,len)
    
61.         path = 系统.获取程序路径() & "配置.ini"
    
62.         遍历(i=0;i<len;i++)
    
63.                 str,父窗口,tlen
    
64.                 字符串.分割(控件组[i],"_",str)
    
65.                 数组空间.大小(str,tlen)
    
66.                 控件类型 = str[0]
    
67.                 控件名 = str[0] &"_"& str[1]
    
68.                 如果(tlen >= 3)
    
69.                         父窗口 = str[2]
    
70.                 否则
    
71.                         父窗口 = ""
    
72.                 如果结束
    
73.                
    
74.                 选择(控件类型)
    
75.                         条件 "编辑框":                //编辑框:保存内容
    
76.                         tmp = 编辑框.获得文本(控件名,父窗口)
    
77.                         辅助.写配置(控件名,控件名,tmp,path)
    
78.                         
    
79.                         条件 "浏览框":                //浏览框:保存内容
    
80.                         tmp = 浏览框.获得(控件名,父窗口)
    
81.                         辅助.写配置(控件名,控件名,tmp,path)
    
82.                         
    
83.                         条件 "复选框":                 //复选框:保存选中状态
    
84.                         tmp = 复选框.获得状态(控件名,父窗口)
    
85.                         辅助.写配置(控件名,控件名,tmp,path)
    
86.                         
    
87.                         条件 "下拉框":                 //下拉框:保存选中项的序号
    
88.                         tmp = 下拉框.得到选项(控件名,父窗口)
    
89.                         辅助.写配置(控件名,控件名,tmp,path)
    
90.                         
    
91.                         条件 "列表框":                //列表框:保存选中项的序号
    
92.                         tmp = 列表框.得到选项(控件名,父窗口)
    
93.                         辅助.写配置(控件名,控件名,tmp,path)
    
94.                 选择结束
    
95.         遍历结束
    
96.         
    
97. 功能结束
    
98. 
    
99. 
    
100. 功能 增加控件到控件组(控件名称)
     
101.         数组空间.增加(控件组,控件名称,1)
     
102.         
     
103. 功能结束
     
104. 空间结束

复制代码

rainshine

支持一下。

ltpccj

分享下原程序呗。谢谢