Проблема записи из одного TMemoryStream в другой

← →
Kest © (2004-05-14 16:08) [0]

Проблема в следующем: пишу в MemoryStream из другого MS получаю отличные данные.
Вот процедура:
type
PCR_R = packed record
S: DWORD;
M: BYTE;
end;
var
PCR: PCR_R;
FN1, FN2: TMemoryStream;
begin
FN1:=TMemoryStream.Create;
FN2:=TMemoryStream.Create;
PCR.S:=$78563412;
PCR.M:=$90;
FN1.Write(PCR, SizeOf(PCR));
FN1.SaveToFile("PCR_FN1.txt"); // здесь все ок (что положили, то и в файле)
FN1.Seek(0, soFromBeginning);
FN2.Write(FN1, SizeOf(FN1)); // из FN1 в FN2
FN2.SaveToFile("PCR_FN2txt"); // а здесь уже белиберда
FN1.Free;
FN2.Free;
end;

Может кто-то подскажет?
LoadFromStream не катит, т.к. хочу не весь поток, а только кусок.

← →
MBo © (2004-05-14 16:23) [1]

> FN2.Write(FN1, SizeOf(FN1)); // из FN1 в FN2
Это совершенно неверно. Используй метод CopyFrom.
З.Ы. Вопрос не в тему конференции - надо в Основную

Спасибо MBo!
Вопрос закрыт.

Проблема записи из одного TMemoryStream в другой Найти похожие ветки