все просто: объявляешь три глобальные переменные
Код:
var
One, Two, Three: Integer;
В процедуре загрузки формы всем этим переменным присваиваешь значение 0
В коде каждой кнопки пишешь
Код:
StringGrid1.Cells[номер колонки, номер строки(One, Two, Three - соответственно для каждой кнопки)] := Нужный_Edit.Text;
Inc(One, Two, Three - соответственно для каждой кнопки);
Т.е. для первой кнопки
StringGrid1.Cells[0, One] := Edit1.Text;
Inc(One);