![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TCanvas и регионы [D7, XP]
Darvin © (2008-02-27 15:27:00)Здравствуйте!
Мне нужно сделать следующее: при прорисовке на канве определить регион допустимой прорисовки, например, если канва размером 800х600, то я хочу рисовать на ней в прямоугольнике (100, 100, 300, 200), а чтобы все попытки нарисовать за его пределами игнорировались бы. Потом определять другой регион на этой же канве и т.д.
Полагаю, что это можно сделать с помощью регионов API, но не получается. Делаю так:
with dgPages.Canvas do begin
SetRectRgn ( dgPages.Canvas.Handle, Left, Top, Right, Bottom );
...
прорисовка
...
SetRectRgn (dgPages.Canvas.Handle, 0, 0, dgPages.Width, dgPages.Height );
end;
1. Правильно ли я полагаю, что такое возможно?
2. Что я делаю не так?
Darvin (2008-02-27 15:48:00) [1]>Palladin © (27.02.08 15:39) [1]
супер, спасибо
Palladin (2008-02-27 15:39:00) [2]1. правильно
2. вызываешь ерунду, не в тему и не с теми параметрами, хоть бы в справке глянул что такое SetRectRgn
MyRgn := CreateRectRgn(100,100,200,200);
SelectClipRgn(Canvas.Handle,MyRgn);
...
прорисовка
...
SelectClipRgn(Canvas.Handle,0);
DeleteObject(MyRgn);