Dynamische Arrays Parameterübergabe

[quendolineDD]

Delphi-Quellcode:

type
  TValueArray = array of String;

  function DoIt(const length : integer) : TValueArray;
  var I : integer;
  begin
    SetLength(Result, length);
    for I := 0 to High(Result) do
      Result[I] := 'Eintrag'+ IntToStr(I);
  end;

var S : TValueArray;
begin
  S := DoIt(5);
end;

Edit:
Will dich damit mal nicht im dunklen lassen.
Also High() gibt die Länge -1 zurück.