Delphi: ошибка записи в StringGrid

[Sianessa]

В общем, такое вот горе - никак не записываются вычисленные значения массива ee[i] в StringGrid3 - соответственно. Столбец всегда один, а количество строк задаётся пользователем при запуске программы в Edit1 и наэимается Button1. Потом первые 2 Гридда случайно заполняются по нажатию Button2. В Edit4 пользователем перед вычислениями так же вводится коэфициент погрешности. После нажатия Button3 должен вывестись результат в Edit3 и StringGrid3ю Вот 3-й грид никак не выводится...

Сам кусок кода, с которым проблем, ну и исходник весь на всякий случай:

procedure TForm1.Button3Click(Sender: TObject);
var
u,y,e, d,m :Real;
i, n:integer;
k:array of Real;
h:array of Real;
ee:array of Real;

begin
d:=StrToFloat(Edit4.text);
n:= StringGrid1.RowCount;
u:=0;
SetLength(k, n);
SetLength(h, n);
for i := 0 to n-1 do
  begin
    k[i]:=StrToFloat(StringGrid1.Cells[0,i]);
    h[i]:=StrToFloat(StringGrid2.Cells[0,i]);
  end;

for i:=0 to n-1 do
begin
u:=u+(k[i]*h[i]);
y:=1/(1+Exp(u));
e:=d-y;
m:=0.5*(Power((y-d),2));
end;
for i:=0 to n-1 do
begin
ee[i]:=e*k[i]*m;

StringGrid3.Cells[0,i]:=FloatToStr(ee[i]);
Edit3.Text:=FloatToStr(m);

end;
end;
end.

[mihali4]

А кто будет задавать размерность массива ЕЕ ? Пушкин А.С. ?

[Roof]

для массива ee тоже надо выделить память ))) указав размерность через SetLenght. Беглым просмотром заметил только это.

[Sianessa]

mihali4, ой, точно...
Вредно мне по ночам программы писать...
Roof, всё, заработало)
Вы опять мне помогли) Спасибо)