Как вывести сообщение когда в столбце уже заполнена последняя ячейка StringGrid

[ARXangel]

Привет всем!
У меня есть кнопка по нажатию на которую, выполняется вот такой код:

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

Когда заполнение из edit1 подходит к концу выдает ошибку.
Как сделать так чтобы когда подходило к последней ячейке выводилось сообщение что ячеек уже нет.
Заранее спасибо!

[mihali4]

Последний ряд (строка) - это ряд с индексом StringGrid1.RowCount-1.
Поэтому должно быть

and (RadioGroup1.ItemIndex<=StringGrid1.RowCount-1) then

А вот этот вопрос

Как сделать так чтобы когда подходило к последней ячейке выводилось сообщение что ячеек уже нет.

поставлен весьма невнятно...

[Stilet]

поставлен весьма невнятно

Вообще вкорне все неверно

Я могу такое посоветовать:

for i:=начальный индекс to конечный индекс do
 StringGrid.Cols[RadioGroup1.ItemIndex].add(Edit1.text);

[IliaIT]

if (RadioGroup1.ItemInde=StringGrid1.RowCount-1) then ShowMessage ('таблица закончилась');

попробуй это вставить для сообщения. после цикла обработки.
или

try
if (RadioGroup1.ItemIndex>-1)
       and (RadioGroup1.ItemIndex<StringGrid1.RowCount-1) then
       begin
            StringGrid1.Cells[RadioGroup1.ItemIndex,StringGrid1.Row]:=edit1.text;
            StringGrid1.Row:=StringGrid1.Row+1;
except
   ShowMessage ('таблица закончилась')
end;

тут намеренно осталась ошибка цикла, для генерации исключения.

[ARXangel]

поставлен весьма невнятно...

Как вывести сообщение когда в столбце уже заполнена последняя ячейка?

[Kotofff]

Когда заполнение из edit1 подходит к концу выдает ошибку.

Это как "к концу" ? Обрабатывается сообщение Edit`а - при его заполнении отрабатывается приведенный код ? Или как ?
И еще. При увеличении Row нужно проводить контроль не закончились ли строки вообще ...

if StringGrid1.Row < (StringGrid1.RowCount-1) then StringGrid1.Row := StringGrid1.Row + 1 else ShowMessage('Строк больше нету !');

Хотя вверху уже дали ответы по теме ...