Wenn es dir unbedingt wichtig ist, dass du die Anzahl der Zahlen nicht ermitteln willst, kannst du das auch mit einer Hilfsfunktion umgehen:
Delphi-Quellcode:
type
TDynDoubleArray = array of Double;
function DoubleArrayOf(const Args: array of Double): TDynDoubleArray;
var
I: Integer;
begin
SetLength(Result, Length(Args));
for I := 0 to High(Args) do
Result[I] := Args[I];
end;
var
Data: array[0..2] of TDynDoubleArray;
{...}
procedure TForm1.FormCreate(Sender: TObject);
begin
{ Hier werden die "konstanten" Daten initialisiert }
Data[0] := DoubleArrayOf([1, 2, 3, 10, 8, 9, 0.3]);
Data[1] := DoubleArrayOf([5.6, 3, 7, 1, 5, 12]);
Data[2] := DoubleArrayOf([2.8, 6]);
{...}
end;