PS: (auch wenn es erstmal mit dem Problem noch nicht viel zu tun hat)
Ist InfoArray zufällig ein
array of TInfos
?
Wenn ja, dann könntest du auch direkt
InfoArray[DatIndex] := InfoDatensatz;
machen,
oder sogar gleich
Delphi-Quellcode:
SetLength(Infoarray, DatIndex+1);
Read(InfoDatei, InfoArray[DatIndex]);
Ja, das stimmt, da könnte man einiges vereinfachen auch noch an anderen Stellen in meinem Code. Da das Projekt bisher mein größtes ist und ich sozusagen nach dem Try-and-Error-Prinzip vorgehe, vor allem auch um die Sprache zu lernen, ist der Code nicht überall mit gleichen Kenntnissen geschrieben. So habe ich z.B. prozedural angefangen, bis ich gemerkt habe, dass doch
OOP einige Vorteile mit sich bringt und den Code daraufhin angepasst.
Naja, da scheint irgendwo ein großer Logikfehler drin zu stecken, den man nicht sofort entdeckt, oder irgendwas anderes ist vermurkst...
