array mit Konstanten erstellen ?

[Khabarakh]

@idontwantaname: Probier mal das aus :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  MyArr: TArray;
  Loop: Integer;
begin
  MyArr := TArray.Create(-10, 2);  //!
  for Loop := MyArr.Min to MyArr.Max do
    MyArr.Items[Loop] := Loop;
  ShowMessage('Gefüllt!');
  for Loop := MyArr.Min to MyArr.Max do
    ShowMessage(MyArr.Items[Loop]);
  MyArr.Free;
end;