Hi
you help little and thank you but still some little problems

for this:

int k=0;
for (int rowint=0;rowint<StringGrid1->RowCount;rowint++)
{
for (int colint=0;colint<StringGrid1->ColCount ;colint++)
{
Memo1->Lines->Strings[k++] = StringGrid1->Cells[rowint][colint];
}
}

I took only the first column and not the second. So need to fix the code little more

Code:

for(int i=0;i<StringGrid1->RowCount;i++)
{
py=py0 + i*stepy;
for(int j=0;j<=3;j++)
{
Printer()->Canvas->TextOut(px[j],py,StringGrid1->Cells[j][i]);
}

for that i have only 2 dimensions so we can fix it more simple.. any ideas