| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблемы с записью структуры в файл [D7, XP]
WandR © (2005-11-18 13:17:00)Такая проблема, есть структура 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;
WandR (2005-11-18 15:21:00) [1]Понятное дело что там=)
Antonn спасибо, я проглядел эту функцию=(
Digitman (2005-11-18 13:32:00) [2]
> FStream.WriteBuffer(TempStream, TempStream.Size);
лажа - здесь.
Antonn (2005-11-18 13:26:00) [3]м/у стримами нужно выполнять stream.copy()
| |
