void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
if (MessageDlg("Close application ?", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo,0, mbYes, NULL) == mrYes)
Action = caFree;
else
Action = caMinimize;
}
Как запретить удаление формы?
Люди,
как запретить удаление формы как Win окна (Х в правом вехнем углу)? И еще. Какое событие при таком удалении генериться и как его ловить?
Может ответ уже был, но найти пока не удалось.
как запретить удаление формы как Win окна (Х в правом вехнем углу)? И еще. Какое событие при таком удалении генериться и как его ловить?
Может ответ уже был, но найти пока не удалось.
Цитата:
Originally posted by VovaL
Люди,
как запретить удаление формы как Win окна (Х в правом вехнем углу)? И еще. Какое событие при таком удалении генериться и как его ловить?
Может ответ уже был, но найти пока не удалось.
Люди,
как запретить удаление формы как Win окна (Х в правом вехнем углу)? И еще. Какое событие при таком удалении генериться и как его ловить?
Может ответ уже был, но найти пока не удалось.
Посмотри TForm::BorderIcons;
События OnClose(); OnDestroy();
Забыл про пример:
Код:
Спасибо.
Уже в коде.
Уже в коде.
Цитата:
Originally posted by VovaL
Люди,
как запретить удаление формы как Win окна
Люди,
как запретить удаление формы как Win окна
А еще есть событие OnCloseQuery
Может тоже пригодится.