Forum: Object-Pascal / Delphi-Language
Delphi
by Jürgen Thomas,
9. Nov 2006
Ich hatte mich darauf beschränkt, wichtige Teile zu kopieren und zu zitieren. Die Details sollte Peter selbst "ausfüllen". Vielleicht hätte ich meinen Kommentar in den except-Bereich eintragen sollen. Außerdem weiß ich nicht, was Peter in seiner Prozedur Save1Click vorgesehen hat.
Also meine Empfehlung: nicht jede winzige Einzelheit reklamieren, wenn sie mit dem eigentlichen Thema nichts zu...
Forum: Object-Pascal / Delphi-Language
Delphi
by Jürgen Thomas,
8. Nov 2006
Hallo Peter,
Ja. Wenn Du Dir Deinen Code ansiehst, dann stellst Du fest, dass Du mehrere Abschnitte mehrfach verwendest.
Du solltest also erstens neu gruppieren:
if IsModified then
begin
if MessageDlg = mrYes then
begin
try