Forum: Object-Pascal / Delphi-Language
Delphi
by Jasocul,
26. Jul 2006
Stimmt. Hatte mich durch dein "<>" im ersten if verwirren lassen. habe also das else nach dem letzten if y= 0 vergessen. Oder man macht es so, wie du.
Und ich gestehe, dass mir diesee Fehler mit Luckies Code vermutlich nicht passiert wäre.
Forum: Object-Pascal / Delphi-Language
Delphi
by Jasocul,
26. Jul 2006
Klärt mich auf. Wo ist der Fehler?
Wenn die Belegnummer ungleich Null ist, habe ich einen Fehler vorliegen? :shock:
Ich habe gestern schon die Kritik von Michael Habbe gelesen, dachte mir aber, dass das offensichtlich ist, dass er nicht Recht hat. (Achtung! Jetzt kommt etwas, das nicht ganz ernst gemeint ist!) Aber wenn Luckie das auch übersieht, wundert es mich nicht, dass so viele Goto...
Forum: Object-Pascal / Delphi-Language
Delphi
by Jasocul,
25. Jul 2006
fehler:='';
if Belegnummer <> 0 then
if Belegdatum = 0 then
fehler:='Fehler: Belegdatum'
else
if x = 0 then
fehler:='Fehler: x'
else
if y = 0 then
fehler:='Fehler: y'