Delphi编程中“流”的应用 什么是流？流,简单来说就是建立在面向对象基础上的一种抽象的处理数据的工具。在流中，定义了一些处理数据的基本操作，如读取数据，写入数据等，程序员是对流进行所有操作的，而不用关心流的另一头数据的真正流向。流不但可以处理文件，还可以处理动态内存、网络数据等多种数据形式。如果你对流的操作非常熟练，在程序中利用流的方便性，写起程序会大大提高效率的。 一、Delphi中流的基本概念及函数声明 在Delphi中，所有流对象的基类为TStream类，其中定义了所有流的共同属性和方法。 TStream类中定义的属性介绍如下： 1、Size:此属性以字节返回流中数据大小。 2、Position:此属性控制流中存取指针的位置。 Tstream中定义的虚方法有四个： 1、Read:此方法实现将数据从流中读出。函数原形为： Function Read(var Buffer;Count:Longint):Longint;virtual;abstract; 参数Buffer为数据读出时放置的缓冲区，Count为需要读出的数据的字节数，该方法返回值为实际读出的字节数，它可以小于或等于Count中指定的值。 2、Write:此方法实现将数据写入流中。函数原形为： Function Write(var Buffer;Count:Longint):Longint;virtual;abstract; 参数Buffer为将要写入流中的数据的缓冲区，Count为数据的长度字节数，该方法返回值为实际写入流中的字节数。 3、Seek:此方法实现流中读取指针的移动。函数原形为： Function Seek(Offset:Longint;Origint:Word):Longint;virtual;abstract; 参数Offset为偏移字节数,参数Origint指出Offset的实际意义，其可能的取值如下： soFromBeginning:Offset为移动后指针距离数据开始的位置。此时Offset必须大于或者等于零。 soFromCurrent:Offset为移动后指针与当前指针的相对位置。 soFromEnd:Offset为移动后指针距离数据结束的位置。此时Offset必须小于或者等于零。该方法返回值为移动后指针的位置。 4、Setsize:此方法实现改变数据的大小。函数原形为： Function Setsize(NewSize:Longint);virtual; 另外，TStream类中还定义了几个静态方法： 1、ReadBuffer:此方法的作用是从流中当前位置读取数据。函数原形为： Procedure ReadBuffer(var Buffer;Count:Longint); 参数的定义跟上面的Read相同。注意：当读取的数据字节数与需要读取的字节数不相同时，将产生EReadError异常。 2、WriteBuffer:此方法的作用是在当前位置向流写入数据。函数原形为： Procedure WriteBuffer(var Buffer;Count:Longint); 参数的定义跟上面的Write相同。注意：当写入的数据字节数与需要写入的字节数不相同时，将产生EWriteError异常。 3、CopyFrom:此方法的作用是从其它流中拷贝数据流。函数原形为： Function CopyFrom(Source:TStream;Count:Longint):Longint; 参数Source为提供数据的流，Count为拷贝的数据字节数。当Count大于0时，CopyFrom从Source参数的当前位置拷贝Count个字节的数据；当Count等于0时，CopyFrom设置Source参数的Position属性为0,然后拷贝Source的所有数据； 發表人 - wnhoo 於 2003/04/22 08:46:49

------
风花雪月 e梦情缘

Delphi編程中“流"的應用    什麼是流？流,簡單來說就是建立在物件導向基礎上的一種抽像的處理資料的工具。在流中，定義了一些處理資料的基本操作，如讀取資料，寫入資料等，程式員是對流進行所有操作的，而不用關心流的另一頭資料的真正流向。流不但可以處理檔案，還可以處理動態記憶體、網路資料等多種資料形式。如果你對流的操作非常熟練，在程式中利用流的方便性，寫起程式會大大提高效率的。    一、Delphi中流的基本概念及函數聲明 在Delphi中，所有流對象的基類為TStream類，其中定義了所有流的共同屬性和方法。 TStream類中定義的屬性介紹如下： 1、Size:此屬性以字節返回流中資料大小。 2、Position:此屬性控制流中存取指標的位置。    Tstream中定義的虛方法有四個： 1、Read:此方法實現將資料從流中讀出。函數原形為： Function Read(var Buffer;Count:Longint):Longint;virtual;abstract; 參數Buffer為資料讀出時放置的緩衝區，Count為需要讀出的資料的字節數，該方法返回值為實際讀出的字節數，它可以小於或等於Count中指定的值。 2、Write:此方法實現將資料寫入流中。函數原形為： Function Write(var Buffer;Count:Longint):Longint;virtual;abstract; 參數Buffer為將要寫入流中的資料的緩衝區，Count為資料的長度字節數，該方法返回值為實際寫入流中的字節數。 3、Seek:此方法實現流中讀取指標的移動。函數原形為： Function Seek(Offset:Longint;Origint:Word):Longint;virtual;abstract; 參數Offset為偏移字節數,參數Origint指出Offset的實際意義，其可能的取值如下： soFromBeginning:Offset為移動後指標距離資料開始的位置。此時Offset必須大於或者等於零。 soFromCurrent:Offset為移動後指標與當前指標的相對位置。 soFromEnd:Offset為移動後指標距離資料結束的位置。此時Offset必須小於或者等於零。該方法返回值為移動後指標的位置。 4、Setsize:此方法實現改變資料的大小。函數原形為： Function Setsize(NewSize:Longint);virtual;    另外，TStream類中還定義了幾個靜態方法： 1、ReadBuffer:此方法的作用是從流中當前位置讀取資料。函數原形為： Procedure ReadBuffer(var Buffer;Count:Longint); 參數的定義跟上面的Read相同。注意：當讀取的資料字節數與需要讀取的字節數不相同時，將產生EReadError異常。 2、WriteBuffer:此方法的作用是在當前位置向流寫入資料。函數原形為： Procedure WriteBuffer(var Buffer;Count:Longint); 參數的定義跟上面的Write相同。注意：當寫入的資料字節數與需要寫入的字節數不相同時，將產生EWriteError異常。 3、CopyFrom:此方法的作用是從其它流中拷貝資料流。函數原形為： Function CopyFrom(Source:TStream;Count:Longint):Longint; 參數Source為提供資料的流，Count為拷貝的資料字節數。當Count大於0時，CopyFrom從Source參數的當前位置拷貝Count個字節的資料；當Count等於0時，CopyFrom設置Source參數的Position屬性為0,然後拷貝Source的所有資料；        發表是最好的記憶!