Скачать: CL | DM;

Проблемы с записью структуры в файл   Найти похожие ветки 

← →
WandR   (2005-11-18 13:17) [0]

Такая проблема, есть структура TFileSection. Нужно засунуть ее в TMemoryStream произвести с ней кое какие манипуляции и записать в файл. В файл обезательно нужно записывать используя TFileStream и функцию WriteBuffer.

Но возникает такая проблема, я записываю структуру в TMemoryStream:
TempStream.WriteBuffer(Dir, SizeOf(TFileSection));
потом записываю в файл:
FStream.WriteBuffer(TempStream, TempStream.Size);
Но данные записанные в файл не соответствуют данным из структуры. Как я понимаю это связано с несовпадением типов…
Пробовал записывать так:
FStream.WriteBuffer(TFileStream (TempStream), TempStream.Size);
Не помогает=(
Подскажите что можно сделать?? Исходный код см ниже.

TFileSection = record
     FileName: array[0..119] of char;
     FilePos: integer;
     FileLength: integer;
end;

/////////////////////////////////////////

File: TFileSection;
FStream:TFileStream;
TempStream: TMemoryStream;

/////////////////////////////////////////

//Заполняем структуру File...

TempStream:=TMemoryStream.Create;
TempStream.WriteBuffer(Dir, SizeOf(TFileSection));

FStream := TFileStream.Create("file.txt", fmOpenReadWrite or fmShareDenyWrite);
FStream.WriteBuffer(TempStream, TempStream.Size);

FStream.Free;
TempStream.Free;

---

← →
Antonn ©   (2005-11-18 13:26) [1]

м/у стримами нужно выполнять stream.copy()

---

← →
Digitman ©   (2005-11-18 13:32) [2]

> FStream.WriteBuffer(TempStream, TempStream.Size);


лажа - здесь.

---

← →
WandR   (2005-11-18 15:21) [3]

Понятное дело что там=)
Antonn спасибо, я проглядел эту функцию=(

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c