Цитата:
|
Сообщение от Archer666
проблема в том что, отсортированные должны быть в соседней таблице..
|
А что мешает добавить еще один стринг грид, заполнить его аналогично в одном цикле вместе с первым, а потом вызвать сортировку указав нужный стринггрид? Допустим добавили еще один, пусть называется StringGrid2:
Здесь его заполняем вместе с первым:
Код:
...
for i := 0 to 2 do
for j := 0 to 2 do
begin
StringGrid1.Cells[i,j] := IntToStr(mass[i][j]);
StringGrid2.Cells[i,j] := IntToStr(mass[i][j]);
end;
А здесь сортируем:
Код:
SgSort(StringGrid2, 0, CompNumAsc);
SgSort(StringGrid2, 1, CompNumAsc);
SgSort(StringGrid2, 2, CompNumAsc);
Обыкновенная копипаста и замена единственного числа.