关于文件

关于文件

一个软件，总要有一些文件操作，才会好玩地多（不然一关掉就重新开始了）
所以我们要用到很多的文件，比如存档、设置……
先说说文件变量：
var f:text;
文件变量的定义如上
当然，文件变量不能读入、输出
要用这个文件变量指向某文件
system单元库里的这个过程大家都很熟悉吧
assign(f,文件地址{如果可以只打文件名，就是从当前文件夹开始的地址}:string）；
上面的是与文件建立关联
reset(f)准备读入
rewrite(f)准备输出
close(f)关闭文件
以上是我们比赛时常常用的
题外话：有些同学们在比赛时只加在begin后和end.前，
这有时是不对的，因为有时候程序运行一会儿就halt了，却来不及close，
所以在知道了它（close）的意思后，一定要随机应变哟！
我在给大家说几个
eoln(f)检查这一行是否读完
eof(f)检查这个文件是否读完
这两个玩意算法也能用一下，
比如读入数组是它没输入N
某同学用字符串很麻烦地才读好这个数组
而我机智地使用了eoln
所以编程就要随机应变。
还有erase(f)删除文件
好啦，主要就是这些（system单元库）

还有个dos单元库
这个单元库专门是用文件的（太高级了）
我一般只用几个简简单单的过程：
gettime(var h,m,s,s100:word);把现在的时间赋给这些变量s100为百分之一秒
getdate(var y,m,d,x:word);日期，x为星期
上面是时间
exec(文件名{我记得是exe文件},运行参数);运行某文件
有时候可以这样打：

uses dos;begin    exec('C:\WINDOWS\System32\shutdown.exe','-s -t 0');end.

上面的是函数过程，下面我说一些小技巧：
1.存档文件最好别用一些常见的扩展名，而且内容（如果不是示范）最好加密。
2.程序最好分几大块来写，结构清晰，把几大块放进.inc文件里，
然后在程序中用编译开关{$I 文件地址.inc}，就是把那里的文件
里的东西抄进来。方便修改。
3.配置文件要让人看清楚，只要你能不嫌麻烦。
4.数据库也用文件来存最好。
5.也许已经有人发现了，两个#129~#254的字符并在一起，
会变成汉字。机智的我立刻想到了查词系统。
6.要灵活运用，随机应变，才能编得出好东西。

完