[Pyro]

одномерный массив можно было через memo сделать
глобальные переменные - заподло, касяк
m, n все бы заменил на Stringgrid1.colcount, stringgrid1.rowcount
сортировку сделать если на основе функции нахождения максимумального элемента за пару минут