Zitat von
gammatester:
Nach der for-Schleife hat i keinen Wert (der Compiler sollte eigentliche gemeckert haben, und sowas sollte man ernstnehmen).
Warum? Nach der For Schleihe wird i doch gar nicht mehr benutzt? i dient doch nur als Index?
und der Compiler moniert da nichts.
Zitat von
gammatester:
Außerdem könnte in inttostr(TagArray[High(TagArray)].werktag) der Index High(TagArray) nicht sinnvoll und/oder nicht belegt sein.
'High' gibt den höchsten Index des Arrays an und Label3 gibt mal ein Richtiges, beim einfügen einer Komponente ein falsches Ergebnis an.
Ich habe das auch so getestet:
Delphi-Quellcode:
end; //Ende For Schleife
Label3.Caption:='Der Monat hat '+inttostr(TagArray[High(TagArray)].werktag)+' Werktage';
end; //<- Ende Procedure
Und so:
Delphi-Quellcode:
Label3.Caption:='Der Monat hat '+inttostr(TagArray[i].werktag)+' Werktage';
end; //For
end; //Proc
Es bleibt der Fehler.