【有源码】文件与配置的读写练习作品 高手勿喷

rainshine

文件与配置的读写练习作品 高手勿喷

空间 字符串转换
变量 数据=数组[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
    文件.关闭(句柄)
    辅助.消息框("导出完毕.文件地址:"&地址)
功能结束

空间结束

超自然

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

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

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

rainshine

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

恩恩谢谢 我会改进的

梁文锋

谢谢~好心人~你的东西很适合我~求一直出作品~~

lukeigun

感谢分享！

T星人

文件读写操作我是最近才完成，~~ 想编一个称心如意的小记事本，
所以对这方面很用功，不懂的太多，老是卡在一个地方