Упорядочить строки массива по невозрастанию значений первых элементов строк

void __fastcall TForm1::Button1Click(TObject *Sender)
{
try
{
    StringGrid1->ColCount=StrToInt(LabeledEdit1->Text);
    StringGrid1->RowCount=StrToInt(LabeledEdit2->Text);
    StringGrid2->ColCount=StrToInt(LabeledEdit1->Text);
    StringGrid2->RowCount=StrToInt(LabeledEdit2->Text);
    }
catch(...)
{
ShowMessage("Вводите только цифры");
}
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
try
{
int mas[10][10];
int max, index=0,buf=0,z=0,j=0;
for(int j=0; j<StringGrid1->RowCount; j++)
{
    for(int i=0; i<StringGrid1->ColCount; i++)
        {
            mas[j][i]=StrToInt(StringGrid1->Cells[i][j]);
        }
}
for(int j=0; j<StringGrid1->RowCount; j++)
{
    for(int i=0; i<StringGrid1->ColCount; i++)
        {
            StringGrid2->Cells[i][j]=(StringGrid1->Cells[i][j]);
        }
}
max=mas[0][0];
    for( int i=0; i<StringGrid1->ColCount; i++)
    {
        if (mas[i][j]<mas[i][j+1])
        {
        buf=mas[i][j];
        mas[i][j]=mas[i+1][0];
        mas[i+1][j]=buf;
        index=mas[i][j];
        break;
        }
    }
for(int i=0; i<StringGrid1->ColCount; i++)
{
StringGrid2->Cells[i][0]=mas[i][0];
mas[i][j]=StrToInt(StringGrid2->Cells[i][j]);
    if(mas[i][0]>mas[i+1][0])
    {
        z = mas[i][0];
        mas[i][0]=mas[i+1][0];
        mas[i+1][0]=z;
    }
}
LabeledEdit3->Text=IntToStr(max);
    }
catch(...)
{
ShowMessage("Вводите только цифры");
}
 
}

void __fastcall TForm1::Button2Click(TObject *Sender)
{
try
{
    double mas[100][100];
    double temp;
    for (int i = 0; i < StringGrid1->RowCount; i++)
    {
        for (int j = 0; j < StringGrid1->ColCount; j++)
        {
            for (int i = 0; i < StringGrid1->RowCount; i++)
            {
                mas[i][j]=StrToFloat(StringGrid1->Cells[j][i]);
                if (mas[i][0]>mas[i-1][0])
                {
                    temp=mas[i][0];
                    mas[i][0]=mas[i-1][0];
                    mas[i-1][0]=temp;
                }
            }
        }
    }
    //ShowMessage(max);
    for (int j = 0; j < StringGrid2->ColCount; j++)
    {
        for (int i = 0; i < StringGrid2->RowCount; i++)
        {
 
            StringGrid2->Cells[j][i]=FloatToStr(mas[i][j]) ;//StringGrid1->Cells[j][i];
 
        }
    }
}
catch(...)
{
ShowMessage("Вводите только цифры");
}
 
}
//---------------------------------------------------------------------------

class TMyGrid : public TStringGrid
{
public:
    using TStringGrid::MoveRow;
};
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    TMyGrid *grid = reinterpret_cast<TMyGrid*>(StringGrid2);
    for (int r = 0; r < StringGrid1->RowCount; r++)
    {
        grid->Rows[r]->CommaText = StringGrid1->Rows[r]->CommaText;
    }
    for (int r = 0; r < grid->RowCount; r++)
    {
        for (int x = grid->RowCount - 1; x > r; x--)
        {
            if (grid->Cells[0][x] > grid->Cells[0][x - 1])
            {
                grid->MoveRow(x - 1, x);
            }
        }
    }
}