StrToIntDef ist super, aber da muss die
Unit SysUtils eingebunden werden. Gehört das explizite Verwenden von Units zum Stoff in diesem Informatikunterricht?
Wenn ja: Statt
Delphi-Quellcode:
if edit1.Text <> '' then begin
e1 := strtoint(edit1.text);
Anzahl := Anzahl +1;
end else
e1 := 0;
einfach
Delphi-Quellcode:
e1 := StrToIntDef(edit1.text, 0);
if e1 > 0 then
inc(Anzahl);
einsetzen, das ist dann sogar resistent gegen Eingabefehler. Aber, wie gesagt, "uses Sysutils" nicht vergessen.