Zablokowanie zamknięcia formularza kombinacją ALT+F4
Aby zablokować zamknięcie formularza za pomocą kombinacji ALT+F4 należy utworzyć zdarzenie OnCloseQuery dla formularza i ustawić w nim CanClose na false:
Unit1.cpp |
void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool
&CanClose) |
Aby była możliwość zamknięcia programu np. za pomocą przycisku Button1 wywołujemy metodę Terminate() obiektu TAplication:
Unit1.cpp |
void __fastcall TForm1::Button1Click(TObject *Sender) |