Страница 102 из 127
Запрещение кнопки закрытия [X] формы
// Чтобы запретить кнопку закрытия формы, напишите следующий
// код (Form1- ваша форма, Button1 - кнопка на ней):
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HMENU MenuHandle = GetSystemMenu(Handle, false);
if(MenuHandle)
DeleteMenu(MenuHandle, SC_CLOSE, MF_BYCOMMAND);
}