| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отрезать кусок изображения [Delphi, Windows]
OlegL © (2002-11-28 16:05:00)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 всё равно не едёт.
OlegL (2002-11-28 16:17:00) [1]Я пробовал загрузить с диска изображение такого-же размера (64х64) после чего поверх него хотел записать из bit (это я так что-бы не мучать ся долго :-)))
MBo (2002-11-28 16:07:00) [2]gh создал, а размеры и формат не задал
| |
