добавление строк StringGrid

[Alex_76]

Доброе время суток, я начинающий в Delphi. Мне необходимо добавить в СтрингГрид записи с Эдитов и добавить строку в СтрингГрид, но сверху заполненной строки.
В чем ошибка?

StringGrid1.Cells[0,0]:=Edit1.text;
StringGrid1.Cells[1,0]:=Edit2.text;
StringGrid1.Cells[2,0]:=Edit3.text;
StringGrid1.RowCount:=StringGrid1.R owCount+1;
form2.Edit1.Clear;
form2.Edit2.Clear;
form2.Edit3.Clear;

заранее спасибо

[Iceman]

если с верху ты имееш ввиду что те надо чтоб прежний текст остовался а след. записывался в новом столбике то:
место StringGrid1.RowCount:=StringGrid1.R owCount+1; заведи переменную
и ее увеличевай на один (пример. var x:integer; .. x:=x+1; )
А там где
StringGrid1.Cells[0,0]:=Edit1.text;
StringGrid1.Cells[1,0]:=Edit2.text;
StringGrid1.Cells[2,0]:=Edit3.text;
там место 0 ставь x

StringGrid1.Cells[0,x]:=Edit1.text;
StringGrid1.Cells[1,x]:=Edit2.text;
StringGrid1.Cells[2,x]:=Edit3.text;

[Alex_76]

Не получается, строку не заменяет и не добавляет
новой

StringGrid1.Cells[0,i]:=Edit1.text;
StringGrid1.Cells[1,i]:=Edit2.text;
StringGrid1.Cells[2,i]:=Edit3.text;
i:=i+1;

[Stilet]

 StringGrid1.rowcount:=StringGrid1.rowcount+1
 
 StringGrid1.Cells[0,StringGrid1.rowcount]:=Edit1.text;
 StringGrid1.Cells[1,StringGrid1.rowcount]:=Edit2.text;
 StringGrid1.Cells[2,StringGrid1.rowcount]:=Edit3.text;

[Alex_76]

Виталий, я извняюсь, но хотел бы попросить еще немного помощи.
Процедура работает, но не корректно. Появляется строка в СтрингГрид, записи нет, после добавления второй записи появляется первая и.д. При этом верхние две строки всегда пустые

[Stilet]

Ну поставь [0,StringGrid1.rowcount-1] и в остальных тоже.

[Alex_76]

Form1.StringGrid1.Cells[0,Form1.StringGrid1.RowCount-1]:=atetostr.Form5.DateTimePicker1.da te;
верно ли написано?
ругается: [Error] Unit5.pas(68): Undeclared identifier: 'atetostr'

[Stilet]

Раз ругается значит неверно. Нужно

DateTostr(Form5.DateTimePicker1.date)