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

Вниз

Если кто-то работал с ZLib, помогите!   Найти похожие ветки 

 
Unknown user ©   (2004-12-01 19:22) [0]

Как заставить грузится TBitmap из TDecompressionStream. При вызове TBitmap.LoadFromStream определяется размер потока- вызывается TStream.GetSize, в котором используется Seek(0, soFromEnd), а для TDecompressionStream Origin=soFromEnd в Seek -это недопустимая операция. Как выйти из этого положения, Надо записывать/считывать графику...


 
GuAV ©   (2004-12-01 19:23) [1]

Unknown user ©   (01.12.04 19:22)

Писать размер вперёд данных.


 
Unknown user ©   (2004-12-01 19:29) [2]

Ч использую стандартный TBitmap.LoadFromStream. Создавать свои графические классы только для считывания/записи в поток как-то не хочется.


 
GuAV ©   (2004-12-01 19:47) [3]

А если объявить своего наследника TStream, и из TDecompressionStream прочитать размер для GetSize, , и дальнейшее чтение делать из TDecompressionStream ?


 
Unknown user ©   (2004-12-01 20:36) [4]

2 GuAV. Проблема в том, что размер распакованных данных в процессе чтения сжатого потока мы знать не можем, поэтому TDecompressionStream так и реагирует на GetSize. А менять TBitmap.LoadFromStream -значит создавать свой класс. Может есть графичесские библиотеки для Делфи, которые содержат граф. классы имеющие методы LoadFromStream?


 
GuAV ©   (2004-12-02 00:43) [5]

Сам хотел уже написать [3] кодом, как нашел способ проще

type
 TXBitmap = class(TBitmap);
...

 TXBitmap(Bmp).ReadData(S, True)
 TXBitmap(Bmp).WriteData(S, True)


 
GuAV ©   (2004-12-02 00:44) [6]

Пардон, без вторго True, с WriteStream попутал.


 
Unknown user ©   (2004-12-06 16:41) [7]

2 GuAV. Запоздавшее спасибо. Очень мне помогли, сам бы я, по причине невнимательности, никогда бы не нашел эти процедуры.



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

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

Наверх




Память: 0.48 MB
Время: 0.044 c
1-1101931887
Гость
2004-12-01 23:11
2004.12.19
Delphi 2005 - портится русский текст в Version Info


3-1100666712
Explorer
2004-11-17 07:45
2004.12.19
DBGridEh - STFilter


14-1101233228
DRK
2004-11-23 21:07
2004.12.19
Что вы думаете о разрешении покупки оружия частным лицам


14-1101580285
TButton
2004-11-27 21:31
2004.12.19
Хотите узнать что чувствует человек после 69 часов бодрствования?


8-1095298644
Ozone
2004-09-16 05:37
2004.12.19
Обход контура в BitMap