Dynamic Array Einfache Zuweisung

[amoibos]

Vollständigkeitshalber ich habs jetzt so gelöst, nicht hübsch aber es erfüllt seinen Zweck.

Code:

TIntArray = array of Integer; 

Function FillIntArray(VarIntArray : array of integer) : TIntArray;
begin
     setlength(Result, length(VarIntArray));
     move(VarIntArray[0], Result[0], length(VarIntArray)*sizeof(integer));
end;

Mit Strings ist das ganze ein wenig komplizierter.

[himitsu]

Stimmt die Angabe mit dem Delphi 5 überhaupt?
Und wenn nicht, warum nennst du deine Version dann nicht?

TIntArray.Create gibt es erst seit einer Weile und x := [1, 2, 3]; wurde doch erst mit XE7 oder XE8 eingeführt?

[amoibos]

Zitat von himitsu:

Stimmt die Angabe mit dem Delphi 5 überhaupt?
Und wenn nicht, warum nennst du deine Version dann nicht?
...

Aber sonst ist alles ok bei dir?