StringGrid и RadioGroup

[ARXangel]

Привет всем!
У меня на форме есть StringGrid (четыре на четыре) и RadioGroup из четырех кнопок.

Как сделать так чтобы при включении к примеру первой RadioButtom в StringGrid добовлялось значение из Edit в первую строчку, если будет нажата четвертая RadioButtom то значение добавляется в четвертую строчку StringGrid. И при добавлении нового значения в StringGrid переходил на новую ячейку этой строки?
Заранее всем спасибо!

[Stilet]

Например так учитывая проверки

if (RadioGroup1.ItemIndex>-1)
and (RadioGroup1.ItemIndex<StringGrid1.RowCount-1) then begin
 StringGrid1.Cells[0,RadioGroup1.ItemIndex]:=edit1.text;
 if ((RadioGroup1.ItemIndex+1)<=(StringGrid1.RowCount-1)) then
  StringGrid1.Row:=RadioGroup1.ItemIndex+1;
end;

[ARXangel]

А если ячейка уже заполнена, как переходить на новую?

[Stilet]

увеличивай значение StringGrid1.Row

[ARXangel]

Вот как я сделал, только у меня добовляет значение сразу в третью колонку (первая фиксироанная). Подскажите как сделать чтобы добовляла сразу во вторую?

if AvtorGr.ItemIndex=0 then
  begin
       with StringGrid1 do
      if Col < ColCount-1 then
         Col := Col + 1
      else if Row < RowCount - 1 then
      begin
           Col := 1;
      end;
      StringGrid1.Cells[StringGrid1.col, AvtorGr.ItemIndex]:=FloatToStr(k);
  end;