Главная страница
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.48 MB
Время: 0.039 c
15-1172341327
Ricky
2007-02-24 21:22
2007.03.18
BSOD - помогите избавится


1-1169483449
Dmitry_177
2007-01-22 19:30
2007.03.18
Непонятные ошибки при компиляции


15-1171973570
TIF
2007-02-20 15:12
2007.03.18
ПИРАТ УРАЛЬСКИХ МОРЕЙ -Кто у кого ворует интеллект.собственность?


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


3-1166797685
дарья
2006-12-22 17:28
2007.03.18
Как насторить Interbase и Fire bird?