Скачать: CL | DM;

bmp -> jpg   Найти похожие ветки 

← →
Gentos   (2007-04-18 10:45) [0]

Всем здрасте. Каким образом можна перевести с bmp в jpg . И как можно заставить TDBImage работать с jpg картинками ?

---

← →
Novice   (2007-04-18 11:12) [1]

Если я правильно помню:

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... Вариантов много, все зависит от того, какую конкретно цель Вы преследуете.

---

← →
Novice   (2007-04-18 11:13) [2]

Прошу прощения:
B := TBitmap.Create;
B.LoadFromFile("SomeFile.bmp");
J := TJPEGImage.Create;
J.Assign(B);
J.SaveToFile("SomeFile.JPG");
B.Free;
J.Free;

---

← →
Gentos   (2007-04-18 11:20) [3]

> Novice   (18.04.07 11:13) [2]

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

---

← →
Amoeba ©   (2007-04-18 14:29) [4]

TDBJpegImage:
http://delphi.ktop.com.tw/download.php?download=5%5Cvcl%5Cgraphics%5Cjpg%5Cjpgimg.zip

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c