Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

bmp -> jpg

Gentos © (2007-04-18 10:45:00)
Всем здрасте. Каким образом можна перевести с bmp в jpg . И как можно заставить TDBImage работать с jpg картинками ?

Amoeba (2007-04-18 14:29:00) [1]
TDBJpegImage:
http://delphi.ktop.com.tw/download.php?download=5%5Cvcl%5Cgraphics%5Cjpg%5Cjpgimg.zip

Gentos (2007-04-18 11:20:00) [2]

> Novice (18.04.07 11:13) [2]

большое человеческое спасибо :)

Novice (2007-04-18 11:13:00) [3]
Прошу прощения:
B := TBitmap.Create;
B.LoadFromFile('SomeFile.bmp');
J := TJPEGImage.Create;
J.Assign(B);
J.SaveToFile('SomeFile. JPG');
B.Free;
J.Free;

Novice (2007-04-18 11:12:00) [4]
Если я правильно помню:

uses JPEG;
...
var B : TBitmap;
J : TJPEGImage;
...
B := TBitmap.Create;
B.LoadFromFile('SomeFile.bmp');
J := TJPEGImage.Create;
J.Assign(B);
J.SaveToFile('SomeFile.bmp');
B.Free;
J.Free;

Самый простой вариант.
Есть и другой - вместо Assign сделать попиксельное копирование канвы, или же BitBlt с канвы в канву... Или просто использовать что-либо наподобие ACDsystems, Adobe Photoshop... Вариантов много, все зависит от того, какую конкретно цель Вы преследуете.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »