Einzelnen Beitrag anzeigen

Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#5

Re: Laden/Speichern

  Alt 18. Jun 2008, 19:54
Neben dem fehlenden Input in der angesprochenen Zeile würde ich noch eine weitere Überprüfung am Ende des REPEAT..UNTIL-Block setzen und zwar die Prüfung auf Dateiende. Das geht mit:
until (a=AA) OR (EOF(t)) Was mir auch auffällt, was nicht eindeutig beschrieben ist, ist das Array. Hasz du ein dynamisches oder ein statisches Array? Beim einem dynamischen solltest du die Größ mit SetLength() um 1 vergrößern, bevor du einen neuen Wert reinschreibst. Bei einem statischen Array kann es passieren, dass es nicht groß genug ist. Dies kannst du nicht durch SetLength() behoben werden. Hier empfehle ich den Umstieg auf ein dynamisches Array.

Bernhard
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat