Как вписать масив с 14 и сортировку вставками

#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int n=14;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
randomize();
        Edit1 ->Text=IntToStr(n);
        StringGrid1 ->ColCount=n;
        for(int i=0; i<n;i++)
                StringGrid1 ->Cells[i][0] = IntToStr(random(21) - 10);
        Label1->Hide();
        StringGrid2 ->Hide();
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        n=StrToInt(Edit1 ->Text);
        if(n>14){
                ShowMessage("Ìàêñèìàëüíà ê³ëüê³ñòü 14!");
                n=14;
                Edit1 ->Text = "14";
        }
        StringGrid1 ->ColCount=n;
        for(int i=0; i<n;i++)
                StringGrid1 ->Cells[i][0]=IntToStr(random(21) - 10);
        Label1->Hide();
        StringGrid2 ->Hide();
        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
        int i, kol = 0, a[14];
        for(i=0; i<n;i++)
              a[i]=StrToInt(StringGrid1 ->Cells[i][0]);
        for(i=0; i<n;i++)
                if(a[i]>=0) a[kol++] = a[i];
        StringGrid2 ->ColCount = kol;
        StringGrid2 ->Show();
        Label1->Show();
        for(i=0; i<kol;i++) StringGrid2 ->Cells[i][0]=IntToStr(a[i]);
 
}
//---------------------------------------------------------------------------