Forum: Object-Pascal / Delphi-Language
Delphi
by fkerber,
28. Jun 2004
Hi!
Danke für die Info, Sharky.
Hatte den Quellcode so von Sakura aus dem anderen Thread übernommen.
Ciao fkerber
Forum: Object-Pascal / Delphi-Language
Delphi
by fkerber,
28. Jun 2004
Hi!
Warum geht es auch mit + und warum sollte man dann or benutzen?
Eben war noch ein Schreibfehler drin, also hier mal korrekt:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if Application.MessageBox('Programm Beenden?', 'Titel', MB_ICONQUESTION + MB_YESNO) = IDYES then
Forum: Object-Pascal / Delphi-Language
Delphi
by fkerber,
28. Jun 2004
Hi!
Leserlich sieht das ganze so aus:
if Application.MessageBox('Programm Beenden?', 'Tital', MB_ICONQUSTION + MB_YESNO) = IDYES then
begin
Application.Terminate;
end;