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

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

Копирование изображения [D7, 2000, XP, 2003]

apic ©   (2007-10-19 12:35:00) 

Есть картинка загруженная в Image (к примеру 100х100 пикселей), как скопировать кусок этого изображения (к примеру х1=10, у1=15, х2=29, у2=50) и сохранить в отдельный файл (к примеру рис.bmp)?

---

KSergey   (2007-10-19 14:28:00) [1]

> apic ©   (19.10.07 14:20) [4]
> Ошибка при выполнении,

Ааа..
Только в пункте 2 имеется 2 вопросительных предложения.

---

apic   (2007-10-19 14:20:00) [2]

Ошибка при выполнении, а Image'сы уже на форме!!!!!!!!

---

KSergey   (2007-10-19 14:08:00) [3]

> jpgImg:=TJPEGImage.Create;
>  jpgImg.LoadFromFile(ExtractFilePath(Application.ExeName)+'pic.
> jpg');
>  Image1.Picture.Assign(jpgImg);
>  Image2.Picture.Assign(jpgImg);
> //здесь выдает ошибку
> Image2.Canvas.BrushCopy(Rect(0,0,10,10),Image1.Picture.Bitmap,
> Rect(0,0,10,10),0) ;

1. По коду я вижу создание объекта для jpgImg. А вот для Image1 и Image2 - не вижу.
Может в этом дело?

2. А нельзя ли все еж озвучить чт оименно за ошибка и когда она происходит? ПРи компиляции или при выполнении?

---

apic   (2007-10-19 13:52:00) [4]

И так тоже
Image2.Canvas.CopyRect(Rect(0,0,10,10),Image1.Canvas,Rect(0,0,10,10));

---

apic   (2007-10-19 13:51:00) [5]

jpgImg:=TJPEGImage.Create;
 jpgImg.LoadFromFile(ExtractFilePath(Application.ExeName)+'pic.jpg');
 Image1.Picture.Assign(jpgImg);
 Image2.Picture.Assign(jpgImg);
//здесь выдает ошибку
Image2.Canvas.BrushCopy(Rect(0,0,10,10),Image1.Picture.Bitmap,Rect(0,0,10,10),0) ;

---

Наверх