[icWasya]

Определьсь с индексами i,j; какой из них строка, а какой столбец.
в строке 16 - первый индекс i, второй j

Код:

strtoint(stringgrid1.Cells[i,j]) 

в строке 19 - второй индекс i

Код:

stringgrid1.Cells[9,i]:=  

по синтаксису

Код:

 property Cells[ACol, ARow: Integer]: string