Срезы в с++ builder

[DirtyBASS]

Здравствуйте. Нужна Ваша помощь.
В общем у друга взял код программы

void __fastcall TForm1::Button2Click(TObject *Sender)
{
int t;
int x;
valarray<int> va(size);
int k=0;
for (int i=0; i<n; i++)
for (int j=0; j<n; j++)
{ va[k]=StrToInt(StringGrid1->Cells[j][i]);
k++;}
valarray<int> va1(n);

for (int i=n-1; i>0; i--)
{
va1[slice(0,n,1)]=valarray<int>(va[slice(n*i,n,1)]);
va[slice(n*i,n,1)]=valarray<int>(va[slice(n*(i-1),n,1)]);
va[slice(n*(i-1),n,1)]=valarray<int>(va1[slice(0,n,1)]);
}
for (int i=0; i<n; i++)
for (int j=0; j<n; j++)
StringGrid1->Cells[j][i]=IntToStr(va[i*n+j]);
}

Этот код сдвигает строки матрицы, а мне нужно, чтобы сдвигались столбцы.
Замена i на j не помогает. А в срезах разобраться не могу. Помогите поправить код. Заранее спасибо.