fx

3482879

空间 保存界面配置
//默认空间
//开始按钮_点击操作
功能 开始_点击()
   
功能结束
//退出按钮_点击操作
功能 退出_点击()
   
    辅助.退出()
功能结束

功能 按钮0_点击()
    //这里添加你要执行的代码
    // 保存复选框的状态
    如果(复选框.获得状态("复选框0"))
        // 如果选中则在配置文件里写入字符d
        辅助.写配置("tcdata","check","d","c:\\testconfig.ini")
    否则
        // 如果没有选中则在配置文件里写入空字符
        辅助.写配置("tcdata","check","","c:\\testconfig.ini")
    如果结束
   
    // 把编辑框里的内容写进配置文件里
    辅助.写配置("tcdata","edit",编辑框.获得文本("编辑框0"),"c:\\testconfig.ini")
   
    // 保存下拉框当前状态
    选项 = 下拉框.得到选项("下拉框0")
    辅助.写配置("tcdata","commbo",选项,"c:\\testconfig.ini")
   
    // 保存浏览框的路径
    辅助.写配置("tcdata","路径",浏览框.获得("浏览框0"),"c:\\testconfig.ini")
   
功能结束

功能 初始化()
    //这里添加你要执行的代码
    // 加载配置文件里的信息
    内容 = 辅助.读配置("tcdata","check","c:\\testconfig.ini")  //读取复选框的状态
    // 如果配置文件里check有d内容则设置复选框选中，反之设置为假
    如果(字符串.比较("d",内容) ==0)   
        复选框.选中("复选框0",真)   //复选框选中
    否则   
        复选框.选中("复选框0",假)  // 复选框不选中
    如果结束
   
    内容 = 辅助.读配置("tcdata","edit","c:\\testconfig.ini")  //读取编辑框的内容
    编辑框.设置文本("编辑框0",内容)
   
    内容 = 辅助.读配置("tcdata","commbo","c:\\testconfig.ini")  //读取下拉框的选项值
    // 此处判断了内容变量的值是否为整型,因为下面的控件命令需要的是整型值
    如果(类型.是否为整型(内容))
        下拉框.设置选项("下拉框0",内容)
    如果结束
   
    内容 = 辅助.读配置("tcdata","路径","c:\\testconfig.ini")  //读取浏览框的内容
    浏览框.设置("浏览框0",内容)
   
功能结束
空间结束
//空间结束语句

hu863063648

回复 1楼3482879的帖子

这是要干什么?问问题?