Delphi. Трюки и эффекты - страница 9
Следующая функция – CreateEllipticRgn – предназначена для создания региона эллиптической формы. Параметры этой функции – координаты прямоугольника (аналогично CreateRectRgn), в который вписывается эллипс.
Третья функция – CreateRoundRectRgn – создает регион – прямоугольник с округленными углами. При этом первые четыре параметра функции аналогичны соответствующим параметрам функции CreateRectRgn. Параметры р5 и рб – ширина и высота сглаживающих углы эллипсов (рис. 1.4).
Трех приведенных функций достаточно даже в том случае, если нужно создавать регионы очень сложной формы. Это достигается при помощи многочисленных операций над простыми регионами, как в приведенном далее примере создания региона по битовому шаблону. Однако рассмотрим еще одну несложную функцию, которая позволяет сразу создавать регионы-многоугольники по координатам точек – вершин многоугольников:
function CreatePolygonRgn(const Points; Count, FillMode: Integer): HRGN;
Рис. 1.4. Округление прямоугольника функцией CreateRoundRectRgn
Функция CreatePolygonRgn принимает следующие параметры:
• Points – указатель на массив записей типа TPoint, каждый элемент массива описывает одну вершину многоугольника, координаты не должны повторяться;
• Count – количество записей в массиве, на который указывает Points;
• FillMode – режим заливки региона (в данном случае, попадает ли внутренняя область многоугольника в регион).
Параметр FillMode принимает значения WINDING (попадает любая внутренняя область) или ALTERNATE (попадает внутренняя область, если она находится между нечетной и следующей четной сторонами многоугольника).
Примечание
При создании регионов с помощью любой из указанных выше функций координаты точек задаются в системе координат того окна, в котором предполагается использовать регион. Так, если у нас есть кнопка 40 х 30, левый верхний угол которой расположен на форме в точке (100; 100), то для того, чтобы создать для кнопки прямоугольный регион 20 х 15 с левой верхней точкой (0;0) относительно начала координат кнопки, следует вызвать функцию CreateRectRgn с параметрами (0, 0, 19, 14), а не (100, 100, 119, 114).
Поскольку регион является GDI-объектом (подробнее в гл. 6), то для его удаления, если он не используется системой, применяется функция удаления GDI-объектов DeleteObject: