Schleifenproblem in Lazarus

[ONeill]

Ist array of String, aber auch mit Array[0..7] of String für 8 Objekte bringt den selben Fehler. Setlength hab ich glaube nicht verwendet :S
Das mit den unterfunktionen kann ich morgen mal probieren, allerdings muss es doch auch mit der schleife gehen?! Zumal eine eigene procedure oder gar Funktion hier eigentlich keinen Sinn macht, da ich diesen Code nur an der Stelle brauche.