文件系统03 – 零基础入门学习Delphi36
文件系统03
让编程改变世界
Change the world by program
记录型文件变量的定义
记录型文件变量的定义,下面以一个存放鱼油数据的记录型文件变量为例来说明记录型文件变量的定义方法。
步骤一:定义记录类型
type
FishcOil = record
name: String;
rdate: Integer; // 20111203
sex: Char; // ‘M’ or ‘F’
end;
步骤二:定义记录文件类型的变量
var
记录文件类型变量名: 记录文件类型;
VFFishcOil: File of FishcOil
提前体验一下:Example (源代码下载)
记录型文件的打开和关闭
和文本文件一样,AssignFile 标准过程用来关联记录文件变量与实际的磁盘文件。
Reset 和 Rewrite 过程用来打开记录文件,CloseFile 过程用来关闭记录文件。。。
但注意不能用 Append 过程来打开一个记录文件,它仅限于文本文件。
这里,Reset打开记录文件的属性是读或写!
和文本文件相比,关闭文件的操作对记录文件更为重要。如果忘记关闭写过的文本文件,最坏的情况是文件被截断。
如最后一行写到文件中的数据并没真正的存入磁盘,这可能会导致一些麻烦,但一般来说很容易弥补。
然而对于记录文件,如果在添加记录以后忘记关闭文件,极大可能会破坏整个文件。。。
体验一下:建立自己的资源文件FishC.dat(源代码下载)
记录型文件的读写
要把记录写入到记录文件中,我们仍旧是调用 Write 过程实现。
例如,下面的代码把变量 v1 和变量 v2 中的内容写入到与记录型文件变量 VFFishcOil 相关联的文件中去:
Write(VFFishcOil, v1);
Write(VFFishcOil, v2);
当然,上面的两条语句也可写成:
Write(VFStudent, v1, v2)
从记录型文件中读取数据可使用 Read 过程,可以一次读取一条记录到一个变量中,也可以一次读取多条记录存放到多个变量中。
如:
Read(VFFishcOil, v1, v2);
上面的语句也可写成:
Read(VFFishcOil, v1) ; Read(VFFishcOil, v2);
需注意的是,如果用Read过程读取记录,文件位置指针超过了文件尾,将会发生运行时错误。因此读取数据时一般要对文件尾进行判断。
课间作业
[体验] 自己尝试新建、打开记录文件并对其进行读写操作。
视频下载
技术, IT技术, Delphi, 视频教程
风险提示及免责条款
市场有风险,投资需谨慎。本文不构成个人投资建议,也未考虑到个别用户特殊的投资目标、财务状况或需要。用户应考虑本文中的任何意见、观点或结论是否符合其特定状况。据此投资,责任自负。
本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场,不承担相关法律责任。如若转载,请注明出处。 如若内容造成侵权/违法违规/事实不符,请点击【内容举报】进行投诉反馈!