|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 warcraftii 于 2014-8-24 00:09 编辑
个人原创 谈不上一键保存. 但是比自己每个控件都手动敲代码要好多了. 不说多了,分享一下.
控件的命名规则必须如此不然没法使用: 控件类型_控件名称_子界面名称
例子1(控件在主窗口上,不是在子窗口的):比如一个用来记录账号的编辑框 编辑框_账号 就这样子.不需要最后的_子窗口
例子2:(控件在子界面上) 假如子界面名称叫"子界面1"那么就是 编辑框_账号_子界面1 这样必须加上子界面名称
另外控件必须用控件类型开头.不然不好判断类型 下面是代码 分3步
1. 加入控件到控件组(控件名称) 把你界面上的控件一个个的加入
2. 全部加入完了用 一键保存配置() 保存配置 .保存路径是程序目录下 名称叫配置.ini
3. 界面载入的时候使用 一键读取配置() 就可以全部读出来啦.
另外有一些不常用的控件没有加入,只加入了常用的.需要的自己搞
最后,打个广告 老瓜工作室 接辅助脚本制作 联系QQ 194527277
- 空间 快速保存配置
- 控件组 = 数组[0]
- 功能 一键读取配置()
- path = 系统.获取程序路径() & "配置.ini"
- 如果( 文件.是否存在(path) == 假)
- 返回 假
- 如果结束
- str
- 字符串.分割(文件.读文件(path),"\r\n",str)
- len
- 数组空间.大小(str,len)
- 遍历(i=0;i<len;i++)
- 如果( 字符串.查找字符串(str[i],"=") >= 0)
- tmp,tlen,父窗口
- 字符串.分割(str[i],"_",tmp)
- 控件类型 = tmp[0]
- 控件名 = 字符串.截取(str[i],0,字符串.查找字符串(str[i],"="))
- 数组空间.大小(tmp,tlen)
- 如果(tlen >= 3)
- 父窗口 = tmp[2]
- 否则
- 父窗口 = ""
- 如果结束
- 选择(控件类型)
- 条件 "编辑框": //编辑框:设置内容
- tmp = 辅助.读配置(控件名,控件名,path)
- 编辑框.设置文本(控件名,tmp,父窗口)
-
- 条件 "浏览框": //浏览框:设置内容
- tmp = 辅助.读配置(控件名,控件名,path)
- 浏览框.设置(控件名,tmp,父窗口)
-
- 条件 "复选框": //复选框:设置选中状态
- tmp = 辅助.读配置(控件名,控件名,path)
- 如果(tmp == "-1")
- 复选框.选中(控件名,真,父窗口)
- 否则
- 复选框.选中(控件名,假,父窗口)
- 如果结束
-
- 条件 "下拉框": //下拉框:保存选中序号
- tmp = 辅助.读配置(控件名,控件名,path)
- 下拉框.设置选项(控件名,tmp,父窗口)
-
- 条件 "列表框": //列表框:保存选中序号
- tmp = 辅助.读配置(控件名,控件名,path)
- 列表框.设置选项(控件名,tmp,父窗口)
- 选择结束
- 如果结束
- 遍历结束
-
- 功能结束
- 功能 一键保存配置()
- len
- 数组空间.大小(控件组,len)
- path = 系统.获取程序路径() & "配置.ini"
- 遍历(i=0;i<len;i++)
- str,父窗口,tlen
- 字符串.分割(控件组[i],"_",str)
- 数组空间.大小(str,tlen)
- 控件类型 = str[0]
- 控件名 = str[0] &"_"& str[1]
- 如果(tlen >= 3)
- 父窗口 = str[2]
- 否则
- 父窗口 = ""
- 如果结束
-
- 选择(控件类型)
- 条件 "编辑框": //编辑框:保存内容
- tmp = 编辑框.获得文本(控件名,父窗口)
- 辅助.写配置(控件名,控件名,tmp,path)
-
- 条件 "浏览框": //浏览框:保存内容
- tmp = 浏览框.获得(控件名,父窗口)
- 辅助.写配置(控件名,控件名,tmp,path)
-
- 条件 "复选框": //复选框:保存选中状态
- tmp = 复选框.获得状态(控件名,父窗口)
- 辅助.写配置(控件名,控件名,tmp,path)
-
- 条件 "下拉框": //下拉框:保存选中项的序号
- tmp = 下拉框.得到选项(控件名,父窗口)
- 辅助.写配置(控件名,控件名,tmp,path)
-
- 条件 "列表框": //列表框:保存选中项的序号
- tmp = 列表框.得到选项(控件名,父窗口)
- 辅助.写配置(控件名,控件名,tmp,path)
- 选择结束
- 遍历结束
-
- 功能结束
- 功能 增加控件到控件组(控件名称)
- 数组空间.增加(控件组,控件名称,1)
-
- 功能结束
- 空间结束
复制代码
|
评分
-
查看全部评分
|