TC官方合作论坛

标题: 循环读写配置,只写了一行的配置,求解 [打印本页]
作者: qjl515728270    时间: 2013-9-5 03:03
标题: 循环读写配置,只写了一行的配置,求解
功能 退出_点击()
//这里添加你要执行的代码
    r_row
    r_col
    行=r_row
    列=r_col
    表格.大小("表格0",r_row,r_col)
    行=1
    列=1
    循环(行<r_row)
    循环(列<r_col)
    辅助.写配置("表格0",行&"行"&列&"列",表格.获得内容("表格0",行,列),"\\配置文件A.ini")         
    列=列+1
    循环结束
    行=行+1
循环结束
    辅助.消息框("配置已保存,5秒后退出")
    辅助.等待(5000)
    辅助.退出()
功能结束
功能 读取配置()
    r_row
    r_col
    行=r_row
    列=r_col
    表格.大小("表格0",r_row,r_col)
    行=1
    列=1
    循环(行<r_row)
    循环(列<r_col)
    表格.设置内容("表格0",行,列,辅助.读配置("表格0",行&"行"&列&"列","\\配置文件A.ini"))         
    列=列+1
    循环结束
    行=行+1
循环结束
功能结束
作者: qjl515728270    时间: 2013-9-5 03:07
大神都睡了
作者: xiaoling2013    时间: 2013-9-5 08:04

  2. //你懂得
  3. 空间 配置
  4. 功能 表格读(父窗口名称,表格名="表格0",字段="表格",属性名="配置属性",路径点=".\\配置文件.ini")
  5. 行数,列数,b=0,c=1
  6. 表格.大小(表格名,行数,列数,父窗口名称)
  7. 如果(行数>0)
  8. 如果(列数>0)
  9. 遍历(a=1;a<行数;a++)
  10. 导出配置:
  11. 表格.设置内容(表格名,a,b,辅助.读配置(属性名,字段&a&c,路径点),父窗口名称)
  12. b=b+1,c=c+1
  13. 如果(b>列数-1)
  14. b=0,c=1
  15. 否则
  16. 跳转 导出配置
  17. 如果结束
  18. 遍历结束
  19. 如果结束
  20. 如果结束
  21. 功能结束
  22. 功能 表格写(父窗口名称,表格名="表格0",字段="表格",属性名="配置属性",路径点=".\\配置文件.ini")
  23. 行数,列数,b=0,c=1
  24. 表格.大小(表格名,行数,列数,父窗口名称)
  25. 如果(行数>0)
  26. 如果(列数>0)
  27. 遍历(a=1;a<行数;a++)
  28. 写入配置:
  29. 辅助.写配置(属性名,字段&a&c,表格.获得内容(表格名,a,b,父窗口名称),路径点)
  30. b=b+1,c=c+1
  31. 如果(b>列数-1)
  32. b=0,c=1
  33. 否则
  34. 跳转 写入配置
  35. 如果结束
  36. 遍历结束
  37. 如果结束
  38. 如果结束
  39. 功能结束
  40. 空间结束
复制代码





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