дело в том, что я не знаю делфи, а пишу на c, c#, c++
но принцип таков:

RowNum =0
while StringGrid1.Cells[1, RowNum] не равен ' '

do
RowNum++ // считает строки

потом когда достигает пустой строки

получаем текст из предыдущей строки StringGrid1.Cells[1, RowNum-1]

и зписываем в пустую строку StringGrid1.Cells[1, RowNum] нужный текст в зависимости от текста предыдущего

на пример StringGrid1.Cells[1, RowNum] = нужный текст + текст предыдущего

если содержание предыдущей строки не имеет значения значит просто в пишешь StringGrid1.Cells[1, RowNum] = нужный текст