[A'Narky]

Подскажите пожалуйста код. Вот проблемка: на форме 3 edit, 1 StringGrid,под каждым Edit-ом Button-ы помогите с кодом, так как начинающий. Необходимо заполнять таблицу различными значениями Edit-ов.Чтобы после, того как кнопка нажата, заполнялась следующая ниже ячейка в этом же столбце. Если несложно, помогите. Заранее благодарю.

[Drozh]

все просто: объявляешь три глобальные переменные

Код:

1 2	var  One, Two, Three: Integer;

В процедуре загрузки формы всем этим переменным присваиваешь значение 0

В коде каждой кнопки пишешь

Код:

1 2 3 4 5 6

StringGrid1.Cells[номер колонки, номер строки(One, Two, Three - соответственно для каждой кнопки)] := Нужный_Edit.Text; Inc(One, Two, Three - соответственно для каждой кнопки);   Т.е. для первой кнопки StringGrid1.Cells[0, One] := Edit1.Text; Inc(One);

[A'Narky]

Drozh спасибо за ценный совет, действительно все оказалось довольно просто Все работает просто замечательно. еще раз спасибо, тему можно закрывать.

[pesi]

не помешает сделать проверку

Код:

1 2 3 4 5 6 7

if StringGrid1.RowCount-1<one then ShowMessage('Увы, но строк для заполнения больше нет!') else begin StringGrid1.Cells[0, One] := Edit1.Text; Inc(One); end;