Code:
for i := 1 to 11 do
begin
if Laeufer^.Laufzeit[i] <> 0 then <--- Hier sagt der Compiler "Undefinierte Bezeichner Laufzeit", was ja auch logisch ist, da der Bezeichner ja Laufzeit1, Laufzeit2 usw. heißt
begin
Laeufer^.LaufZeit[i] := NettoZeit;
Break;
end;
end;
Wenn du ein Array verwendest, solltest du auch entsprechend die Arraygrenzen abfragen:
Delphi-Quellcode:
for i := Low(Laeufer^.Laufzeit) to High(Laeufer^.Laufzeit) do
begin
{...}
end;
Dann ists auch egal, ob das Array bei 0 oder 1 anfängt
