StringGrid: отсортировать второй столбец по возрастанию

int i,j;
float mas[300]; // çíà÷åíèÿ èç âûáîðêè
float sum,os,s; //sum -    ÷àñòîòà,os îáùàÿ ñóììà ïî çíà÷åíèÿì âàðèàíò, s îòíîñèòåëüíàÿ ÷àñòîòà
OpenDialog1->Execute();
Memo1->Clear();
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
StringGrid1->RowCount=2;
for (i=0;i<Memo1->Lines->Count;i++){  //  çàíîñèì äàííûå èç ôàéëà
StringGrid1->RowCount=StringGrid1->RowCount+1;
StringGrid1->Cells[0][i]=IntToStr(i+1);
StringGrid1->Cells[1][i]=Memo1->Lines->Strings[i];
}
StringGrid2->Cells[0][0]="¹ âàðèàíòû";
StringGrid2->Cells[1][0]="Çíà÷åíèå âàðèàíòû";
StringGrid2->Cells[2][0]="×àñòîòà";
StringGrid2->Cells[3][0]="Îòíîñ.÷àñòîòà";
StringGrid2->Cells[4][0]="Çíà÷.åìïð.ôóíê";
StringGrid2->RowCount=2;
os=0;
for (i=0;i<Memo1->Lines->Count;i++){  // çàïîëíÿåì ìàññèâ ýëåìåòíàìè âûáîðêîé
  mas[i]=StrToFloat(Memo1->Lines->Strings[i]);
  os=os+mas[i];
  }
 
StringGrid2->RowCount=2;
for (i=0;i<Memo1->Lines->Count;i++){  // âûâîäèì
StringGrid2->RowCount=StringGrid1->RowCount+1;
StringGrid2->Cells[0][i+1]=IntToStr(i);
StringGrid2->Cells[1][i+1]=Memo1->Lines->Strings[i];
sum=0;
for (j=0;j<=i;j++){ //ñ÷èòàåì ÷àñòîòó âàðèàíòû
 sum=sum+mas[j];
}
StringGrid2->Cells[2][i+1]=FloatToStr(sum);
StringGrid2->Cells[3][i+1]=FloatToStr(sum/os);
s=(sum/os); // ïîëó÷àåì îòíîñèòåëüíóþ ÷àñòîòó
}