JpegImage в TFileStream

← →
Лёха (2004-11-06 03:11) [0]

Вот такая беда: пихаю массив из TJpegImage в TFileStream,
но при загрузке читается только самая первая (Width и Height соответствуют), а position стрима оказывается в конце потока :(
Естественно, Delphi начинает громко ругаться матом. Поможите, plz.

← →
Poirot © (2004-11-08 22:46) [1]

Логику смени:)
Просто стрим не расчитан на чтение LoadFromStream поблочно, причём разной длиныы.!!!
Лучшиё вариант просто не пользоватьстрим таким образом:) а например сделай что-нить оригинальное своё для этой цели:)

>пихаю массив из TJpegImage в TFileStream,
Код пихания?

А вообще стоит создать вспомогательный TMemoryStream, сбрасывать каждую картинку в него, писать в файл длину данных, потом сами данные (CopyFrom). При чтении сначала читаешь длину, потом данные одной картинки в MemStream копируешь, из нее уже загружаешь jpeg (TJpegImage читает поток целиком)

JpegImage в TFileStream Найти похожие ветки