TC官方合作论坛

标题: 【有源码】文件与配置的读写练习作品高手勿喷 [打印本页]

作者: rainshine 时间: 2013-12-14 22:41
标题: 【有源码】文件与配置的读写练习作品高手勿喷
文件与配置的读写练习作品高手勿喷

空间字符串转换
变量数据=数组[2][100000],大小=1000

功能按钮0_点击()
路径=文件.对话框(1)
如果 (字符串.移除(路径,字符串.长度(路径)-4,真)==".txt")
      句柄=文件.打开(路径)
      内容=文件.读一行(句柄)
      变量空行=0,循环控制=0,临时=数组[2]
      循环 (空行<5)
         如果 (字符串.查找字符(内容,44)>0)
            空行=0
            字符串.分割(内容,",",临时)
            数据[0][循环控制]=临时[0]
            数据[1][循环控制]=临时[1]
            循环控制++
            内容=文件.读一行(句柄)
         否则
            空行++
            内容=文件.读一行(句柄)
         如果结束
      循环结束
      大小=循环控制
      文件.关闭(句柄)
      辅助.消息框("导入完毕.","提示:")
如果结束
功能结束

功能得到日期()
thedate = 日期时间.当前日期()
return 日期时间.年(thedate)&日期时间.月(thedate)&日期时间.日(thedate)&日期时间.时(thedate)&日期时间.分(thedate)&日期时间.秒(thedate)
功能结束

功能按钮1_点击()
路径=文件.对话框(2)
地址=路径&"\\转换_"&字符串转换.得到日期()&".ini"
句柄=文件.创建(地址)
for(循环控制=0;循环控制<大小;循环控制++)
      文件.写一行(句柄,"["&类型.转字符型(循环控制+1)&"]")
      文件.写一行(句柄,"ServerName=填写你的区")
      文件.写一行(句柄,"Account="&数据[0][循环控制])
      文件.写一行(句柄,"Psd="&数据[1][循环控制])
      文件.写一行(句柄,"PlayName=新建角色")
endfor
文件.关闭(句柄)
辅助.消息框("导出完毕.文件地址:"&地址)
功能结束

空间结束

作者: 超自然 时间: 2013-12-14 23:40
新手代码能完整实现,不错!!值得赞

不过代码尚有改进空间,比如数组定义,初始可为0成员,后面使用数组重定义让成员在需要的时候才增加.
养成一个好习惯,尽量减少变量污染,不需要的数组长度不申请,不重复使用的值不进变量,还可以节约内存开销

善用return.比如whule(空行<5)其实可以直接while(true),在情况结束时直接return.用好这个,你会发现函数能灵活很多

考虑使用线程,读这个东西,可少,可多,碰到一个长文件,你这样界面肯定卡死.

作者: rainshine 时间: 2013-12-15 08:37

超自然发表于 2013-12-14 23:40
新手代码能完整实现,不错!!值得赞
不过代码尚有改进空间,比如数组定义,初始可为0成员,后面使 ...

恩恩谢谢我会改进的

作者: 梁文锋 时间: 2014-5-14 17:00
谢谢~好心人~你的东西很适合我~求一直出作品~~

作者: lukeigun 时间: 2014-5-14 23:36
感谢分享！

作者: T星人 时间: 2014-12-15 04:28
文件读写操作我是最近才完成，~~ 想编一个称心如意的小记事本，
所以对这方面很用功，不懂的太多，老是卡在一个地方

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)