| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Работа с JPG в Delphi

.cpp ©   (2005-05-09 08:30:00) 

Как в Delphi работать с JPG изображением ?

Мне нужно:
----------
- создать
- загрузить
- перерисовать (Draw(X, Y, Graphic), чтобы можно было сдвигать         изображение вправо/влево)

Для формата BMP всё вышеперечисленное я делаю так:
-------------------------------------------------

Image1: TImage;
Bitmap: TBitmap;
...
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile( 'C:\image1.bmp' );
...
Xb := Xb + 10;
Image1.Canvas.Draw(Xb, Yb, Bitmap);
...
Bitmap.Free;
-------------------------------------------------

Если для JPG аналогично попробовать сделать, но через класс TGraphic, то будет ошибка...

---

.cpp   (2005-05-09 19:43:00) [1]

Непонятно возможно ли для JPG пользоваться методом Draw(X, Y, Graphic).
Переменная TJPegImage создана, рисунок загружен, но при перерисовки в Image1

Image1.Canvas.Draw(X, Y, Graph);

экран чёрный, никакого изображения...

Как можно передвигать JPG изображение? Для BMP я делал через метод Draw(...)

---

П7   (2005-05-09 16:35:00) [2]

подключаешь модуль JPEG и юзаешь TJPEGImage...
Вроде так как-то...

---

Sphinx   (2005-05-09 15:56:00) [3]

uses
 Jpeg;

и обязательно посмотри:
C:\Program Files\Borland\Delphi7\Help\Examples\Jpeg

---

Наверх