Текущий архив: 2004.04.11;
Скачать: CL | DM;
Вниз
Конвертация *.bmp в *.jpeg Найти похожие ветки
← →
ASvencim © (2004-04-19 16:59) [0]Есть ли в Delphi встроенная процедура конвертирования *.bmp в *.jpg?
← →
ASvencim © (2004-04-19 17:00) [1]Извините, ошибся, нужно наоборот *.jpg в *.bmp
← →
WebErr © (2004-04-19 17:01) [2]А самому в FAQ залезть не судьба?
← →
Clickmaker © (2004-04-19 17:02) [3]TJpegImage
← →
WebErr © (2004-04-19 17:06) [4]http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988625147&n=21
*.jpg в *.bmp ИМХО так же
← →
Yanis © (2004-04-19 17:11) [5]
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;
{
CompressionQuality (default 100):
Set a value between 1..100, depending on your need of quality and
image file size. 1 = Smallest file size, 100 = Best quality.
Mit CompressionQuality konnen Sie die Qualitat der Komprimierung fur die
JPEG-Grafik festlegen (Default ist 100), wenn diese gespeichert wird.
Eine hohere Komprimierung ergibt eine etwas schlechtere Bildqualitat,
dafur aber eine kleinere Datei.
1 = kleinste Dateigrosse, 100 = beste Qualitat
}
Из фака Vit"а
← →
ASvencim © (2004-04-19 17:11) [6]>WebErr © (19.04.04 17:01) [2]
>А самому в FAQ залезть не судьба?
Ну не знаю я английский, и переводчика под рукой нет!
← →
ASvencim © (2004-04-19 17:16) [7]Спасибо, помогли
Страницы: 1 вся ветка
Текущий архив: 2004.04.11;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.045 c
