MaxAntwort kann man sich sparen, da (MaxAntwort = (Length(arrFehler) + 1)) bzw. (MaxAntwort = High(arrFehler))
Des Weiteren:
- Randomize NUR UND WIRKLICH NUR ins OnCreate (oder ähnliches)
- Aufrufen besser einfach mit:
Label1.Caption := arrFehler[random(high(arrFehler))];