TArray - Alternative zu SetLength(..) ?

[Der schöne Günther]

Ich gebe nochmal ein Beispiel.

Ganz klassisch:

Delphi-Quellcode:

procedure p();
var
   a, b: TArray<Single>;
   arrayIndex: Integer;
begin
   SetLength(a, 100);
   for arrayIndex := Low(a) to High(a) do
      a[arrayIndex] := 10.0;
   
   SetLength(b, 50);
   for arrayIndex := Low(b) to High(b) do
      b[arrayIndex] := 20.0;
      
   ProcessData(a, b);
end;

Mir war das zu lang. Ich wollte lieber so etwas haben:

Delphi-Quellcode:

procedure p()
begin
   ProcessData(
      TArray.Construct<Single>(100, 10.0),
      TArray.Construct<Single>(50, 20.0)
   );
end;

Ich bekam es. Und sah dass es gut war. Ende 😉