Ist eine möglichkeit. Mit OnClose gehts aber auch! Etwa so:
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if MessageDlg('sicher?',mtconfirmation,[mbYes,mbNO,mbCancel],0) = mrNo then Action := caNone;
end;
So wird das Programm nur geschlossen, wenn auf Ja geklickt wird.