为了方便编程Delphi在很多需要与文件打交道的组件类中都定义了直接文件存取方法使用这些方法可以非常简单地将组件中处理的数据保存到文件中或从文件中读取所需的数据到组件中LoadFromFile和SaveToFile就是最直接的存取文件的方法 LoadFromFile方法 LoadFromFile方法的说明性定义格式如下 procedure LoadFromFi|e(const FileNamestring)virtual 其中FileName参数指明文件名和路径该方法从FileName指明的文件中读取数据例如MemLinesLoadFromFile(FileListBoxlFi|eName) 是用LoadFromFile方法将FileListBoxlFileName指定文件的数据读出并装入Memo组件中 SaveToFile方法 SaveToFile方法的说明性定义格式如下 procedure SaveToFile(const FileNamestring)virtual 其中FileName参数指明文件名和路径该方法将数据保存到FileName指明的文件中例如 MemLinesSaveToFi|e(FileListBoxlFileName) 是用SaveToFile方法将Meno组件中的数据保存到FileListBoxlFileName指定的文件中去 使用LoadFromFile和SaveToFile方法的常用类 ()TStrings类 TStrings类中的LoadFromFile和SaveToFile方法可处理文本文件因为TStrings类中保存的就是多行的文本数据例如TMemo类中的Lines属性就是一个TStrings类型调用Lines的Load— FromFile方法可以读取文本文件的内容并显示在Memo组件中例如 MemLinesLoadFromFile(FileListBoxlFileName) MemLinesSaveToFile(FileListBoxlFileName) TStrings类的子类也可以处理其他类型的文件如TRichedit的Lines属性中保存的类实例其实就是TStrings类的一个衍生类可以处理多种类型的文件格式包括RTF文件类型 ()TGraphic类 TGraphic类是许多处理图形数据类的基类在TGraphic类中定义的LoadFromFile和SaveT— oFile方法只是虚方法并不能做图形文件的存取但其子类(如TBitmapTIcon以及TJPEGIm—age等)都继承了这两个方法以处理不同格式的图形文件 ()TPicture类 TPicture则在读取和保存文件时自动根据文件的扩展名调用不同的类方法进行存取 在例中使用TPicture类的LoadFromFile方法将学生照片录入到DBImagel组件中的语 句如下DBImagelPictureLoadFromFile(OpenDialoglFileName) |