|
(Moderator)
Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
Delphi 2006 Professional
|
Re: Schließen der Form verhindern
11. Feb 2004, 21:54
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if mrYes <> MessageDlg('wirklich schließen', mtConfirmation, [mbYes, mbNo], 0) then
Action := caNone;
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
|