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

Вниз

Сохранить TGPBitmap в файл   Найти похожие ветки 

 
Efir ©   (2007-10-03 22:07) [0]

Я предполагаю, что делать нужно так:

var
 f:TFileStream;
 bmp:TGPBitmap;
 sa:TStreamAdapter;
begin
 bmp:=TGPBitmap.Create("1.png");
 f:=TFileStream.Create("GDIP.sav", fmCreate);
 sa:=TStreamAdapter.Create(f);

 bmp.Save(sa, ImageFormatPNG);

 f.Free;
 bmp.Free;
 sa.Free;
end;

но ничего не происходит. Хочется сохранить несколько картинок в один файл.


 
Efir ©   (2007-10-03 22:33) [1]

Нашёл ошибку:

encoderClsid:TGUID;

GetEncoderClsid("image/jpeg", encoderClsid);
bmp.Save(sa, encoderClsid);

Вроде сохраняет, но вот теперь как загрузить?
С таким кодом вылетает ошибка:

f:=TFileStream.Create("GDIP.sav", fmOpenRead);
f.Position:=0;
sa:=TStreamAdapter.Create(f);
bmp.Create(sa);


 
Инс ©   (2007-10-04 10:29) [2]


> bmp.Create(sa);

bmp:=TGPBitmap.Create(sa);
для начала, а там посмотрим...


 
Efir ©   (2007-10-04 21:53) [3]

Аааа, ну я и лузер, это ж надо так ступить.

> Инс ©   (04.10.07 10:29) [2]
спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
15-1230597130
Илья Корстин
2008-12-30 03:32
2009.03.01
"Спрятать" область диска или пометить как неиспользуемую


6-1198685585
Lamer666
2007-12-26 19:13
2009.03.01
Проблемы с подсчетом трафика!!!


15-1230723251
Чудак
2008-12-31 14:34
2009.03.01
Отдача файла скриптом php


2-1232384862
Илья_
2009-01-19 20:07
2009.03.01
Уточнение по работе цикла for


2-1231401940
Patrick1968
2009-01-08 11:05
2009.03.01
Работа с графиками