if ShowConfirmMessage('Are you sure you want to exit the application?') = mrOK then
  close;