Belajar pemrograman C++ Arsip 4.1 - Membuat peringatan saat keluar

 Ini adalah lanjutan dari  Membuat Form peringatan dan informasi pada arsip 4

Seperti yang saya beritahu salah satu fungsi dari form peringatan yaitu meminimalisir salah pencet perintah.
Saya akan beri contoh saja peringatan saat keluar aplikasi.

1. Buatlah form kosong atau form yang anda buat sekarang
2. Pertama  tambahkan events pada objecInspector->Event->OnCloseQuery = CloseQuery 

Setelah itu Double Klik pada Close Query dan Isikan kode berikut ini
Contoh :

void __fastcall TForm1::CloseQuery(TObject *Sender, bool &CanClose)
{
int Pilihan;
Pilihan=Application->MessageBoxA("Apakah anda yakin ingin keluar dari Aplikasi"
,"Peringatan",MB_YESNOCANCEL | MB_ICONWARNING);
switch(Pilihan)
{
        case IDYES:
        CanClose = true;
        break;
        case IDNO:
        CanClose = false;
        break;
        case IDCANCEL:
        CanClose = false;
        break;
}
}

Hasilnya saat dipencet tombol Close maka muncul peringatan :

Saat Memencet Yes maka akan keluar, saat memencet No atau Cancel maka tidak akan keluar atau CanClose bernilai false