غیر فعال کردن دکمه بستن فرم

برای غیر فعال کردن دکمه بستن فرم و فعال کردن ان از کد زیر میشود استفاده کرد :

EnableMenuItem( GetSystemMenu( handle, False ),SC_CLOSE, MF_BYCOMMAND or MF_GRAYED ); 

Enable: 

EnableMenuItem( GetSystemMenu( handle, False ), SC_CLOSE, MF_BYCOMMAND or MF_ENABLED ); 

و اگر نیاز به خاموش بودن دکمه بستن نیست از کد زیر استفاده میشود کرد :

رویداد FormClose:

Action := caNone;