Самое интересное, что код взят из другого запроса
Код HTML:
https://delphisources.ru/forum/showthread.php?p=158569
Даже ошибки в комментариях 100% одинаковые.
Зачем писать begin .. end если без него тоже все будет работать?
Код:
for i := 1 to cou do
for j := 1 to cou do
begin
Cells[i,j] := inttostr(table[i,j]);
end;