سؤل عن كيفة تغير شكل الفورم

السلام عليكم

يمكن ذلك باستخدام Region Functions

var 
  region: HRgn; 
begin 
...
  BorderStyle := bsNone; 
  region := CreateEllipticRgn(1, 1, 200, 200); 
  SetWindowRgn(handle, region, true); 
...
end;

http://www.swissdelphicenter.ch/en/showcode.php?id=341

http://www.swissdelphicenter.ch/en/showcode.php?id=533

shape a form to a bitmap

http://www.swissdelphicenter.ch/en/showcode.php?id=582

اي اسئلة عن الدوال المذكورة ان شاء الله الاخوة جميعا تحت الطلب :)

بعض الدوال السابقة مشروحة في قسم الفيجوال بيسك