![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Image [D7, XP]
kail © (2007-02-23 18:52:00)Доскажите, возможно ли средствами Delphi вырезать из изрображения размером x на y начиная с определенных координат?
RASkov (2007-02-23 20:17:00) [1]> [6] kail (23.02.07 19:26)
Ну чтонить типа так:
procedure CutPicture(Im1, Im2: TCanvas; const ARect: TRect);
begin
im2.CopyRect(Rect(0,0,Arect.Right-ARect.Left, Arect.Bottom-Arect.Top), Im1, ARect);
end;
......
CutPicture(Image1.Canvas, Image2.Canvas, Rect(10,10,100,100));
kail (2007-02-23 19:26:00) [2]А можно накидать небольшой листинг, где из image1 получается image2, вырезанная из 1 по опр ширины, высоты и начинаю с опредл. точки
trubin (2007-02-23 19:21:00) [3]Как и указано в [1] TCanvas.CopyRect
kail (2007-02-23 19:04:00) [4]Нет... есть рисунок Bmp вгруженный в компонент image. надо создавать маленькую картинку, вырезанную из большого рисунка
RASkov (2007-02-23 19:02:00) [5]А куда вырезать. Если просто убрать кусок из картинки можно и
Brush.Color:=<цвет фона>;
FillRect(Rect(x1, y1, x1+x, y1+y))
???
kail (2007-02-23 19:02:00) [6]А можно подробнее как это работает
RASkov (2007-02-23 18:58:00) [7]CopyRect