Мастера я наверное плохо описал свою проблему и ВЫ меня не поняли. Комбинировать регионы я умею. Проблема в следующем: Когда я загружаю прогу, выполняется процедура создания регион ввиде эллипса. Вот formcreate:
| Код | var ellRg:HRGN; begin ... ellRg:=CreateEllipseRGN(100,100,width-100,heigth-100); //помойму так пишется try setwindowRGN(handle,ellrg,true); finally deleteobject(ellrg); end; end;
|
Значит прога загрузилась форма ввиде эллипса. Жму на кнопку. В кнопке:
| Код | var RectFormRG:HRGN; Rect:HRGN; begin RectFormRG:=createrectRGN(0,0,width,heigth); rect:=createrectRGN(20,20,width-20,heigth-20) CombineRgn(RectFormRG,RectFormRG,rect,RGN_OR); //в выше приведенной процедуре по идее (я так думаю) должен был объединится эллипс // с прямоугольником setwindowRGN(handle,rectformRg,true); end;
|
Думаю, что сейчас будет понятно. То есть мне надо Комбинировать регион формы с новым регионом. А проблема возникает откуда взять этот регион формы. |