19-04-2016, 04:01 PM
19-04-2016, 06:39 PM
يمكن استخدام التوابع التالية:
ومن ثم تطبق على الفورم باستخدام:
مثال-ضع هذا الكود ضمن OnCreate للفورم المعني:
كود :
CreateEllipticRgn
CreateEllipticRgnIndirect
CreatePolygonRgn
CreatePolyPolygonRgn
CreateRectRgn
CreateRectRgnIndirect
CreateRoundRectRgnومن ثم تطبق على الفورم باستخدام:
كود :
SetWindowRgnمثال-ضع هذا الكود ضمن OnCreate للفورم المعني:
كود :
SetWindowRgn(Form1.handle,CreateEllipticRGN(0,0,Width,Height),True);