Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

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

 
kail   (2007-02-23 18:52) [0]

Доскажите, возможно ли средствами Delphi  вырезать из изрображения размером x на y начиная с определенных координат?


 
RASkov   (2007-02-23 18:58) [1]

CopyRect


 
RASkov   (2007-02-23 19:02) [2]

А куда вырезать. Если просто убрать кусок из картинки можно и
Brush.Color:=<цвет фона>;
FillRect(Rect(x1, y1, x1+x, y1+y))
???


 
kail   (2007-02-23 19:02) [3]

А можно подробнее как это работает


 
kail   (2007-02-23 19:04) [4]

Нет... есть рисунок Bmp вгруженный в компонент image. надо создавать маленькую картинку, вырезанную из большого рисунка


 
trubin ©   (2007-02-23 19:21) [5]

Как и указано в [1] TCanvas.CopyRect


 
kail   (2007-02-23 19:26) [6]

А можно накидать небольшой листинг, где из image1 получается image2, вырезанная из 1 по опр ширины, высоты и начинаю с опредл. точки


 
RASkov   (2007-02-23 20:17) [7]

> [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));



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

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.05 c
2-1172170402
Torin2
2007-02-22 21:53
2007.03.18
недоступно меню


15-1171643261
Kolan
2007-02-16 19:27
2007.03.18
Сколько штук IDE вы открывали сразу?


15-1172060034
Prohodil Mimo
2007-02-21 15:13
2007.03.18
А портит ли мобила дискету, если находится рядом? :о)


15-1171978977
Ega23
2007-02-20 16:42
2007.03.18
А куда в Delphi7 делся QuickReport?


15-1172145303
xayam
2007-02-22 14:55
2007.03.18
Новая версия программы DelphiTo v0.23