[romka]

Здравствуйте
столкнулся с проблемой при выводе строки stringgrid в edit'ы

Код:

procedure TForm1.Button3Click(Sender: TObject);
begin
with Form2 do
begin
Edit1.Text:=StringGrid1.Cells[StringGrid1.Row,1];
Edit2.Text:=StringGrid1.Cells[StringGrid1.Row,2];
Edit3.Text:=StringGrid1.Cells[StringGrid1.Row,3];
Combobox6.Text:=StringGrid1.Cells[StringGrid1.Row,5];
Edit5.Text:=StringGrid1.Cells[StringGrid1.Row,7];
Edit4.Text:=StringGrid1.Cells[StringGrid1.Row,6];
Combobox4.Text:=StringGrid1.Cells[StringGrid1.Row,8];
showmodal;
end;
end;

из этого всего работает только

Edit2.Text:=StringGrid1.Cells[StringGrid1.Row,2];

что я не так делаю?