Скачать: CL | DM;

Как отрезать кусок изображения   Найти похожие ветки 

← →
OlegL ©   (2002-11-28 16:05) [0]

Help please! Мне нужно отрезать квадратный фрагмент изображения, вот как я это делаю:
constructor TMap.Create(bit:TBitmap);
var i,sp_hw:integer;
rec1,rec2:TRect;
gh:TBitmap;
Table:TList;
begin
Table:=TList.Create;
sp_hw:=round(bit.Height/10);
rec1:=Rect(0,0,sp_hw,sp_hw);
gh:=TBitmap.Create;
for i:=0 to sp_hw*sp_hw-1 do
begin
rec2:=Rect(i*sp_hw,i*sp_hw,i*sp_hw+sp_hw,i*sp_hw+sp_hw);
gh.Canvas.CopyRect(rec1,bit.Canvas,rec2);
Table.Add(gh);
end;
gh.Free;
end;
...и не получается. В место CopyRect пробовал BitBlt всё равно не едёт.

---

← →
MBo ©   (2002-11-28 16:07) [1]

gh создал, а размеры и формат не задал

---

← →
OlegL ©   (2002-11-28 16:17) [2]

Я пробовал загрузить с диска изображение такого-же размера (64х64) после чего поверх него хотел записать из bit (это я так что-бы не мучать ся долго :-)))

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c