文件系统03

让编程改变世界

Change the world by program

记录型文件变量的定义

记录型文件变量的定义，下面以一个存放鱼油数据的记录型文件变量为例来说明记录型文件变量的定义方法。

步骤一：定义记录类型

[codesyntax lang="delphi"]

typeFishcOil = record name: String;rdate: Integer; // 20111203sex: Char;      // ‘M’ or ‘F’end;

[/codesyntax]

步骤二：定义记录文件类型的变量

[codesyntax lang="delphi"]

var记录文件类型变量名: 记录文件类型;VFFishcOil: File of FishcOil

[/codesyntax] 提前体验一下：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过程读取记录，文件位置指针超过了文件尾，将会发生运行时错误。因此读取数据时一般要对文件尾进行判断。

课间作业

[体验] 自己尝试新建、打开记录文件并对其进行读写操作。 [buy] 获得所有教学视频、课件、源代码等资源打包 [/buy] [Downlink href='http://kuai.xunlei.com/d/LVWGLNGBGVDZ']视频下载[/Downlink]

转载于:https://www.cnblogs.com/LoveFishC/archive/2012/01/07/3846177.html

文件系统03 - 零基础入门学习Delphi36相关推荐

外中断03 - 零基础入门学习汇编语言71
第十五章:外中断03 让编程改变世界 Change the world by program 继续编写int 9中断例程第三步:如果是Esc键的扫描码,改变显示的颜色后返回...... 那么,下一个 ...
第一个程序03 - 零基础入门学习汇编语言22
第四章:第一个程序03 让编程改变世界 Change the world by program 可执行文件中的程序装入内存并运行的原理在DOS中,可执行文件中的程序P1若要运行,必须有一个正在运行的 ...
数据类型,运算符和表达式03 - 零基础入门学习C语言04
第二章:数据类型,运算符和表达式03 让编程改变世界 Change the world by program 字符型数据字符型数据包括字符常量和字符变量字符常量: 是用单引号括起来的一个字符. 例 ...
转移指令的原理03 - 零基础入门学习汇编语言45
第九章:转移指令的原理03 让编程改变世界 Change the world by program jcxz指令 jcxz指令为有条件转移指令,所有的有条件转移指令都是短转移,在对应的机器码中包含转移 ...
直接定址表03 - 零基础入门学习汇编语言74
第十六章:直接定址表03 让编程改变世界 Change the world by program 程序入口地址的直接定址表我们看下面的问题: 实现一个子程序setscreen ,为显示输出提供如下功 ...
围观窗体与组件03 - 零基础入门学习Delphi25
围观窗体与组件03 让编程改变世界 Change the world by program 围观按钮型组件 Button.BitBtn.SpeedButton的一些区别区别一:Button 不能显示 ...
结构化程序设计03 - 零基础入门学习Delphi12
结构化程序设计03 让编程改变世界 Change the world by program 循环结构语句顺序结构和选择结构只能完成一些简单功能,实际的程序也很少只由顺序结构和选择结构组成. 例如小甲 ...
[BX]和loop指令03 - 零基础入门学习汇编语言25
第五章:[BX]和loop指令03 让编程改变世界 Change the world by program 从上边的课程中,我们可以总结出用cx和loop 指令相配合实现循环功能的三个要点: (1)在 ...
顺序程序设计03 - 零基础入门学习C语言09
第三章:顺序程序设计03 让编程改变世界 Change the world by program 题目:输入三角形的三边长,求三角形面积. 已知三角形的三边长a,b,c,则该三角形的面积公式为: ...
文件系统04 - 零基础入门学习Delphi37
文件系统04 让编程改变世界 Change the world by program 记录型文件的记录数记录文件中的记录是顺序排列的,每条记录都有一个编号,记录编号从 0 开始. 因此在包含N个记录 ...

文件系统03 - 零基础入门学习Delphi36