Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Вниз

JPEG   Найти похожие ветки 

← →
Ezorcist   (2006-05-01 14:13) [0]

1 Как перегнать из bmp в jpeg c указанием качества в %

2 Почему в Image2 не появляется картинка? (в image1 есть bmp картинка)

Var M:TMemoryStream;
begin
  M:=TMemoryStream.Create;
  Image1.Picture.Bitmap.SaveToStream(M);
  Image2.Picture.Bitmap.LoadFromStream(M);

---

← →
Virgo_Style ©   (2006-05-01 14:26) [1]

1. TJpegImage, afair, имеет свойство, отражающее качество.

2. попробуй между Save и Load : M.Seek(0, soFromBeginning);

---

← →
Ezorcist   (2006-05-01 14:42) [2]

Можно с Jpeg-ом пример?

---

← →
Anatoly Podgoretsky ©   (2006-05-01 14:52) [3]

TJPEGImage подробнейшая справка с примерами.

---

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

Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.011 c