[NumLock]

Код:

var
  v: Variant;
  i: Integer;
  n1, n2: Integer;
begin
  n1:=2;
  n2:=4;
  v:=VarArrayCreate([n1, n2], varInteger);
  v[2]:=13;
  v[3]:=11;
  v[4]:=1973;
  for i:=VarArrayLowBound(v, 1) to VarArrayHighBound(v, 1) do
    Memo1.Lines.Add(IntToStr(v[i]));
end;

SpinEdit1.Value:=n1;
SpinEdit2.Value:=n2;

не наоборот?