Membuat konfirmasi sebelum keluar di delphi 7

ok inilah yang sekarang menjadi topik yang akan kita bahas. ikuti cara cara di bawah ini...... :D

• buka delphi 7
• pada program yang telah anda buat klik Events pada object Inspector
• klik 2 kali pada on close dan masukkan kode di bawah ini

IF MessageDlg('Are you sure???',mtConfirmation,[mbYes,mbNo],0)=mryes then

  Application.Terminate

else

  Action:=caNone;

end;

• untuk lebih jelasnya lihat gambar berikut

•  pada tulisan berwarna merah ganti sesuai keinginan anda...
• jalankan. Enjoy :D
• GOOD LUCK!