《述职报告ID20080009-山东外贸职业学院10102.ppt》由会员分享，可在线阅读，更多相关《述职报告ID20080009-山东外贸职业学院10102.ppt（13页珍藏版）》请在三一文库上搜索。
1、Keep on walking,杨丽敬,Delphi程序设计工学结合特色精品课程,Chap10 目录、文件和流,文件管理组件 *文件操作 *流 使用类方法进行文件存取,驱动器组合列表框（DriveComboBox）见example10_1 常用属性：Name、DirList、Driver 常用事件：change 目录列表框（DirectoryListBox） 常用属性：FileList、DirLabel、Driver、Directory 常用事件：change 文件列表框（FileListBox） 常用属性：FileEdit、MultiSelect、Drive、Diretory、FileNam
2、e、FileType 文件类型过滤组合列表框（FilterComboBox） 常用属性：FileList、Filter Samples选项卡上的3个功能更强的文件管理组件 ShellTreeView、ShellListView和ShellComboBox,文件管理组件,文件操作,*文件类型与类型文件的操作 *文本文件操作 与文件目录相关的标准过程与函数,文件类型与类型文件的操作,文件类型 文件类型概念 文件分类 文件与数组的区别 类型文件操作 类型文件定义与变量说明 为文件变量指定相应文件 打开文件 读取文件 判断文件是否结束 向文件写入数据,文件变量赋值 Procedure AssignFi
3、le(var f ; Filename: string); 文本文件共同的操作 Procedure reset (var f); Procedure rewrite (var f); Procedure append(var f: Textfile); Procedure read (var f: v1v2vn); Procedure write (var f: Text; p1, p2, ); Procedure writein (var f: Text; p1, p2, ); Procedure CloseFile(var f); 仅用于文本文件的操作 Append Procedure r
4、eadin (var f: v1v2vn); function Eoln (var f: Text) : Boolean;,文本文件操作,流的概念 流是一种抽象的数据处理工具，不仅可以处理文件，还可以处理动态内存、网络数据等多种数据形式 Tstream类 属性：size、position 方法：read、write、seek、setsize、copyfrom TfileStream对象,目录操作函数过程和函数 Chdir(c:abcdir); / 转到目录，改变当前目录 Mkdir(dirname); /建立目录，创建当前目录的子目录 Rmdir(dirname); /删除目录，删除一个空子目
5、录 GetCurrentDir; /取当前目录名，无返回特定磁盘的当前目录 驱动器过程和函数 DiskSize：返回特定磁盘的大小 DiskFree：返回磁盘自由空间 GetDir：Getdir(0,s); System unit/取工作目录名s:=c:abcdir; GetCurrentDir 文件类的过程和函数 Deletfile(abc.txt); /删除文件 Renamefile(old.txt,new.txt); /文件更名 ExtractFilename(filelistbox1.filename); /取文件名 ExtractFileExt(filelistbox1.filena
6、me); /取文件后缀,与文件目录相关的标准过程与函数,流,数据流 数据流（stream）是指一组有顺序的、有起点和终点的字节集合，是对数据传输的总称（或抽象）。 TStream类 属性 方法 派生类 TFileStream类 构造方法Create声明代码如下： constructor Create(const FileName;string ;Mode:Word);,LoadFrom和FileSaveToFile方法 最直接的存取文件的方法： Procedure loadfromfile(const filename: string); Procedure savetofile(const filename: string); 使用以上方法的类： Tstring Tgraph Tpicture LoadFromStream和SaveToStream方法 从流中读取数据及将数据写入流中 Procedure loadfromstream(stream: Tstream); Procedure savetostream(stream: Tstream);,使用类方法进行文件存取,备选实验：,实验内容： 参照程序example10_1作一个文件管理器。 实验要求： 对所学组件进行练习。,感谢聆听！,Thanks for your time！,