Array Reset Probleme

[Georg25]

Code:

function HighAFRExamen:Integer;
begin
  Result := High(AFRExamen);
end;

Eine Liste brauch ich imho nicht, da ich einen eigenen Type dafür hab

Code:

   TFRExam = record
     Name            : string;
     Anzahl          : integer;
   end;

Code:

AFRExamen     : Array of TFRExam;

das ist ja schön, dass ICH nen Fehler gemacht habe, nur ich finde einfach nicht wo, deswegen bat ich um Hilfe. Manchmal sehen 100 Augen mehr als zwei.

Die Arrays sind in einer Unit drin, wo ich von anderen drauf zugreif. Ich greife von mehrere Units drauf zu, die ich ja nach Funktion geordnet habe. (Verschiedene Sortierungsverfahren)