Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.05;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.009 c
14-12862
blackman
2003-04-13 18:46
2003.05.05
---|Ветка была без названия|---


3-12611
Jack128
2003-04-15 12:51
2003.05.05
ibQuery.ParamByName( My_param ).Value := null; - не работает??


14-12873
darkkonung
2003-04-14 15:42
2003.05.05
Поддержка двух интерфейсов (английского и русского)


14-12927
Angel_Forever
2003-04-18 09:00
2003.05.05
блок-схемы


3-12650
sapsi
2003-04-08 13:49
2003.05.05
Потеря связей в таблицах