ich habe doch gesagt, dass ich das nur zum testen auf die schnelle gemacht habe und die feinoptimierung noch kommt.
für mich ist "if ... then begin" identisch mit
"if ... then
begin"
Diese Dinge haben nichts mit dem Fehler zu tun, ebenso die Sache mit "else"