| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
bmp to jpg converting
!ZasranYolidza! © (2003-06-26 19:38:00)
Многоуважаемые Мастера, ПОМОГИТЕ!!!
Необходимо найти методику конвертирования *.bmp -> *.jpg. Тоесть компонент
(уже искал но может гдето...), или исходники (по простому) или, же, сайт, FAQ ну
хоть что-нибудь. (!ПРОСЬБА НЕ ОТСЫЛАТЬ НА ГОТОВЫЕ ПРОГРАМЫ!)
Заранее ОГРОМНЕЙШЕЕ спасибо.
Fu-jan (2003-06-26 22:10:00) [1]
ЭТО Очень СЛОЖНО!!!! ;-)))))
program ...
uses ... Graphics,JPEG, ...
...
...
procedure Bmp2Jpeg(const FileName:string);
var
Bitmap:TBitmap;
Jpeg:TJPEGImage;
begin
Bitmap:=TBitmap.Create;
Jpeg:=TJpeg.Create;
try
Bitmap.LoadFromFile(FileName);
...
Можно еще выставить качество сжатия
Jpeg.CompressionQuality:=0..100;
И прочие опции, которые можно посмотреть в хелпе
...
Jpeg.Assign(Bitmap);
Jpeg.SaveToFile(ChangeFileExt(FileName,".jpg"));
finally
Bitmap.Free;
Jpeg.Free;
end;
end;
| |
