[Змей]

При использовании массива созданного в процедуре у него не сохраняются значения,вот в таком виде нули выдает:

Код:

var
  Form1: TForm1;
  d: array[0..10] of integer;
  i:integer;
  procedure x(d: array of integer);


procedure TForm1.Button1Click(Sender: TObject);
begin
x(d);
for i:=0 to 10 do
memo1.Lines.Add(inttostr(d[i]));
end;

procedure x(d: array of integer);
begin
for i:=0 to 10 do
begin
d[i]:=i;
//form1.memo1.Lines.Add(inttostr(d[i]));
end;
end;

А если выводить прямо из процедуры в мемо то все нормально работает.
Наверное в записи что то поменять нужно, подскажите что.