Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.17;
Скачать: CL | DM;

Вниз

запись в файл   Найти похожие ветки 

 
dimon   (2004-02-07 18:43) [0]

есть структура
TBoomark=record
Description,Path:TStringList;

BoomList:TBoomark;

пытаюсь сохранить все это дело в файл:
f:=TFileStream.Create(ExtractFilePath(Application.ExeName)+"\boomark2.bom",fmCreate or fmOpenWrite);
f.Write(BoomList,sizeof(BoomList));
f.Free;
а так же загрузить обратно:
f:=TFileStream.Create(ExtractFilePath(Application.ExeName)+"\boomark2.bom",fmOpenRead);
f.Read(BoomList,sizeof(BoomList));
f.Free;

Но почему то сохраняется только 8 байт, может я что не так делаю???
Помогите плиз...


 
хз ©   (2004-02-07 18:47) [1]

Может я что-то путаю, но вроде TStringList в TFileStream так не записывается.


 
Sergey_Masloff   (2004-02-07 18:48) [2]

Ну дык sizeof(BoomList) и есть 8 байт. Два указателя по 4 байта. Ну и сохраняешь ты их. На фига непонятно.


 
Palladin ©   (2004-02-07 18:55) [3]


> может я что не так делаю???

Да нет... все так... только ожидания твои не то ожидают...
Созданный объект класса является указателем. Какой бы класс ты не использовал. Идентификаторы динамические массивов тоже являются указателями. Строки, объявленные при директивы {$H+} являются указателями. Если к строкам и массивам еще можно обращатся путем ^ или @[0], то с объектами все гораздо сложней, ибо класс имеет гораздо более сложную организацию чем запись, методы ссылки на другие объекты и свойства.


 
petro   (2004-02-07 18:58) [4]

понятно. спасибо



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

Текущий архив: 2004.02.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-53466
VID
2004-02-05 19:53
2004.02.17
Уменьшение межстрочного интервала в RichEdit


14-53759
N169
2004-01-26 14:30
2004.02.17
Распознавание геометрических фигур


1-53566
iosafat
2004-02-09 10:16
2004.02.17
Какой CHARSET выбрать?


7-53784
Dark Elf
2003-10-30 12:22
2004.02.17
Программирование кассовых аппаратов


8-53663
Tik
2003-10-15 16:13
2004.02.17
расширение фотки