|
Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: Nix tun
3. Sep 2003, 15:21
Delphi-Quellcode:
begin
var
i: Integer;
begin
i := Aplication.messagebox('Beenden?','Bestätigung',4+32);
if i = IDYES then
begin
//tu was;
end
else
exit;
end:
Wobei das Exit überflüssig ist, nur um es deutlich zumachen.
Michael
Ein Teil meines Codes würde euch verunsichern.
|