Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
ВнизTFileStream Найти похожие ветки
← →
ORMADA (2004-01-22 10:26) [0]Пишу в один файл несколько Bitmap"ов
With TFileStream.Create(FileName, fmCreate Or fmOpenWrite) Do
Begin
WriteComponentRes("IMAGE1", TestImage);
WriteComponentRes("IMAGE2", image2);
Free;
End;
всё проходит на ура, когда загружаю всё компоненты а когда требуется загрузить определённый
With TFileStream.Create(ExtractFileDir(Application.ExeName) + "\" + FileName, fmOpenRead) Do
Begin
Try
ReadComponentRes(TComponent(Sender));
Finally
Free;
End;
End;
, который был записан не первым возникает ошибка типа он пытается читать первый компонент а он уже существеует!
Help как сделать выборочную загрузку
← →
Строитель (2004-01-22 10:29) [1]Кто такой Sender:
ReadComponentRes(TComponent( Sender));?
← →
ORMADA (2004-01-22 11:21) [2]любой объект передаваемый процедуре
Sender:TObject
← →
MBo (2004-01-22 12:29) [3]Используй вспомогательный TMemoryStream, при записи сначала пишешь в него, потом в файл размер потока, потом содержимое. Повтор для каждого объекта.
Чтение - аналогично
← →
ORMADA (2004-01-22 12:35) [4]2 MBo © c потоками никогда до этого не работал может накидать маленький пример
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.013 c