Цитата:
Сообщение от dm-451
Здравствуйте. Использую LoadFromStream для чтения данных с потока. Прошу помощи в организации чтения данных с потока с определенной позиции и до определенной, а не весь поток после текущего положения.
P.S. Использую TMemoryStream для чтения/записи RxRichEdit.
Заранее благодарен.
|
Пожалуйста:
Код:
...
var
mem,tar: TMemoryStream;
begin
mem := TMemoryStream.Create;
tar := TMemoryStream.Create;
mem.LoadFromFile('C:\Data.dat');
mem.Seek(15000,soFromCurrent); //переносим текущую позицию на 15000 байт вперёд
tar.CopyFrom(mem,20000); //и читаем 20000 байт в поток tar
...
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
|