Текущий архив: 2005.10.02;
Скачать: CL | DM;
Вниз
Конвертация JPEG в Bitmap Найти похожие ветки
← →
avsam (2005-09-07 17:15) [0]Как сконвертировать JPEG в Bitmap?
Точнее, нужно в QuickReport показать JPEG-файл.
Для этого использую TQRImage. Но он принимает только BMP.
Подскажет кто-нибудь что-то?
← →
Lamer@fools.ua © (2005-09-07 17:22) [1]Bmp.Assign(Jpg);
?
← →
PZ (2005-09-07 17:53) [2]Пример из Delphi Russian Knowledge Base:
uses
JPEG;
procedure JPEGtoBMP(const FileName: TFileName);
var
jpeg: TJPEGImage;
bmp: TBitmap;
begin
jpeg := TJPEGImage.Create;
try
jpeg.CompressionQuality := 100; {Default Value}
jpeg.LoadFromFile(FileName);
bmp := TBitmap.Create;
try
bmp.Assign(jpeg);
bmp.SaveTofile(ChangeFileExt(FileName, ".bmp"));
finally
bmp.Free
end;
finally
jpeg.Free
end;
end;
Страницы: 1 вся ветка
Текущий архив: 2005.10.02;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.07 c
