Forum: Object-Pascal / Delphi-Language
Delphi
by tomsel,
8. Dez 2005
schon gut, bitte sehr. Du darfst Dich wieder von den Knien erheben ;-)
man hilft halt, wo man kann.
Forum: Object-Pascal / Delphi-Language
Delphi
by tomsel,
8. Dez 2005
Hallo noch mal,
wenn gar keine Note eingegeben wird, ist die Anzahl = 0 und es kommt zu einem division by zero - error bei der Division der Notensumme durch die Anzahl. Ihr müsst prüfen, ob Anzahl > 0 ist und nur dann! den Mittelwert berechnen.
Forum: Object-Pascal / Delphi-Language
Delphi
by tomsel,
8. Dez 2005
Hallo,
die vorschläge sind sicher o.k., aber m.E. für die "Zielgruppe" etwas zu kompliziert. Macht es doch ganz einfach:
Anzahl := 0;
if edit1.Text <> '' then begin
e1 := strtoint(edit1.text);
Anzahl := Anzahl +1;