Delphi程序设计第10章 文 件 管 理.ppt

第10章 文 件 管 理 大多数的应用程序都需要读写磁盘文件。本章介绍如何建立文件、读取文件、写文件以及文件夹中文件的删除、复制、更名等各种操作。10.1 公共对话框 10.2 数据文件 10.3 文本相关控件 10.1.1 公共对话框控件 1. 打开对话框（opendialog）控件 opendialog控件用于打开一个已经存在的文件，用户选择某一文件，其所在的驱动器、文件夹、文件名以及文件扩展名将被赋予opendialog的filename属性。 10.1.1 公共对话框控件 Defaultext 设置系统自动附加的扩展文件名Filter:设置可打开的文件类型 Filterindex:设置默认的filter值。 Initialdir:设置对话框打开的初始路径 Options:设置对话框的作用及表现形式。 10.1.1 公共对话框控件 2. 另存为对话框（savedialog）控件 savedialog控件用于提供一个另存为对话框，用户输入某一文件，其所在的驱动器、文件夹、文件名以及文件扩展名将被赋予savedialog的filename属性。其属性及使用方法同opendialog控件相类似。 10.1 公共对话框 在控件栏中的dialog页上提供了dialog控件，为用户提供了一系列标准的Windows公共对话框的控件，可以使用它进行打开或者保存文件、设置字体、选择颜色、设置打印选项等操作。 3. 字体对话框（fontdialog）控件 fontdialog控件用于提供一个字体对话框。如图11-2所示，用户所选择字体的名字、样式、大小、效果及颜色将被赋予fontdialog的font属性。 4. 颜色对话框（colordialog）控件 colordialog控件用于提供一个颜色对话框。如图11-3所示，用户所选择的颜色等属性将被赋予colordialog的color属性。 10.1.1 公共对话框控件 10.1.2 公共对话框的应用举例 【例11-1】使用公共对话框的例子。如图11-4所示，在标签控件中显示打开文件或保存文件的路径名及文件名，字体按钮控制标签控件中的字体，颜色按钮控制标签控件的背景 。程序如下。 Delphi的文件分为文本文件、有类型文件和无类型文件。在一般情况下，文件仅指磁盘文件，但外设如打印机、显示器也是文件，本章的文件仅指磁盘文件。 10.2 数据文件 10.2.1 适合于各种文件的基本操作 1. 与外部文件联系的建立与中断 (1) 文件变量与外部文件建立联系。 通过调用AssignFile过程可以初始化一文件变量即建立文件变量（F）与外部文件之间的联系。AssignFile过程的声明如下： procedure AssignFile(var F; FileName: string); (2) 文件变量与外部文件中断联系。 通过调用CloseFile过程可以中断文件变量（F）与外部磁盘文件之间的联系。CloseFile过程的声明如下： procedure CloseFile(var F); 10.2.1 适合于各种文件的基本操作 2. 文件的打开与关闭 以读方式打开文件（Reset）。 以写方式打开文件（Rewrite） 10.2.1 适合于各种文件的基本操作 (3) 用Erase过程删除文件。 通过调用Erase 过程可删除一外部文件。Erase过程的声明如下： procedure Erase(var F); 10.2.1 适合于各种文件的基本操作 1. 以添加方式打开文件（Append） 通过调用函数Append可打开一个已经存在的文件以便于在文件末尾添加文本。如果在文件最后的128个字节块中，存在字符〈Ctrl〉+〈Z〉（ASCII 26），那么文件将在该字节处插入，并且覆盖该字符。也就是说，文本可被插入到以字符〈Ctrl〉+〈Z〉终止的文件后。Append过程的声明如下： procedure Append(var F: Text); 10.2.2 适合于文本文件的基本操作 2. 文本文件的读取与写入 文本文件通过调用Reset过程后以读方式打开后，就可以使用Read或Readln过程来读取文件数据了。文本文件通过调用Rewrite或Append过程打开一文件后就可以使用Write或Writeln过程来写入数据。 (1) 用Read过程读取数据。 通过调用Read过程可以从文本文件中读取字符串、字符或数字。 10.2.2 适合于文本文件的基本操作 (2) 用Readln过程读取数据。 通过调用Readln过程可以从文本文件中读取字符串、字符或数字，直到一行的结