تغییر شکل اجزاء از مستطیلی

برای تغییر شکل* Edit***از مستطیلی به دور گرد ...
ابتدا از برگه Standard يك Edit آورده و سپس در رويداد OnCreat فرم*کد زیر را بنویسید*:

کد:

کد:
Setwindowrgn(edit1.handle,createroundrectrgn(2,2,edit1.width-2,edit1.height-2,15,15),true);