知识大全 Delphi的组件读写机制

Posted 2022-07-21 知

篇首语：贪婪是最真实的贫穷，满足是最真实的财富。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 Delphi的组件读写机制相关的知识，希望对你有一定的参考价值。

Delphi的组件读写机制 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　一流式对象(Stream)和读写对象（Filer）的介绍

　　在面向对象程序设计中对象式数据管理占有很重要的地位在Delphi中对对象式数据管理的支持方式是其一大特色

　　Delphi是一个面向对象的可视化设计与面向对象的语言相结合的集成开发环境 Delphi的核心是组件组件是对象的一种 Delphi应用程序完全是由组件来构造的因此开发高性能的Delphi应用程序必然会涉及对象式数据管理技术

　　对象式数据管理包括两方面的内容

　　● 用对象来管理数据　　● 对各类数据对象（包括对象和组件）的管理

　　Delphi将对象式数据管理类归结为Stream对象(Stream)和Filer对象(Filer) 并将它们应用于可视组件类库（VCL）的方方面面它们提供了丰富的在内存外存和Windows资源中管理对象的功能

　　Stream对象又称流式对象是TStream THandleStream TFileStream TMemoryStream TResourceStream和TBlobStream等的统称它们分别代表了在各种媒介上存储数据的能力它们将各种数据类型(包括对象和组件) 在内存外存和数据库字段中的管理操作抽象为对象方法并且充分利用了面向对象技术的优点应用程序可以相当容易地在各种Stream对象中拷贝数据

　　读写对象（Filer）包括TFiler对象 TReader对象和riter对象 TFiler对象是文件读写的基础对象在应用程序中使用的主要是TReader和riter TReader和riter对象都直接从TFiler对象继承 TFiler对象定义了Filer对象的基本属性和方法

　　Filer对象主要完成两大功能

　　● 存取窗体文件和窗体文件中的组件　　● 提供数据缓冲加快数据读写操作

　　为了对流式对象和读写对象有一个感性的认识先来看一个例子

　　a)写文件

procedure TFomr WriteData (Sender: TObject); r;Var FileStream:TFilestream; Mywriter:riter; i: integerBegin FileStream:=TFilestream create( c:\\Test txt fmopenwrite);//创建文件流对象 Mywriter:=riter create(FileStream );　//把Mywriter和FileStream联系起来 Mywriter writelistbegin; 　//写入列表开始标志 For i:= to Memo lines count do 　　 Mywriter writestring(memo lines［i］);　//保存Memo组件中文本信息到文件中 Mywriter writelistend; 　　　　　　　　　//写入列表结束标志 FileStream seek( sofrombeginning);　//文件流对象指针移到流起始位置 Mywriter free; //释放Mywriter对象 FileStream free; //释放FileStream对象End; procedure TForm ReadData(Sender: TObject);Var FileStream:TFilestream; Myreader:TReader;Begin FileStream:=TFilestream create( c:\\Test txt fmopenread); Myreader:=TRreader create(FileStream ); //把Myreader和FileStream联系起来 Myreader readlistbegin; 　//把写入的列表开始标志读出来 Memo lines clear; //清除Memo 组件的文本内容 While not myreader endoflist do　//注意TReader的一个方法:endoflist Begin Memo lines add(myreader readstring); //把读出的字符串加到Memo 组件中 End; Myreader readlistend;　//把写入的 cha138/Article/program/Delphi/201311/24811