Also ich würde noch eine Variable dazwischen schubsen um besser damit umgehen zu können.
Delphi-Quellcode:
type
TRec = record
s: string;
i: integer;
end;
TRecs = array of TRec;
noch ein
Recs: TRecs;
um damit spielen zu können.
procedure TuWasRein(const s: string; const i: Integer);
begin
SetLength(Recs, Length(Recs) +1);
Recs[Length(Recs)].s := s;
Recs[Length(Recs)].i := i;
end;
function HolWasRaus(const AIndex: Integer): TRec;
begin
Result.s := Recs[AIndex].s;
Result.i := Recs[AIndex].i;
end;
Nur so mal hier in Editor getippst, nicht getestet.