Вывести элементы массива, находящиеся до минимального элемента

#include <Math.hpp>
#include <limits>
...
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  StringGrid1->DefaultColWidth = StringGrid1->RowHeights[0] * 2;
  StringGrid1->ColCount = CSpinEdit1->Value;
  Randomize();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int *a = new int [CSpinEdit1->Value];
  int i_min = std::numeric_limits<int>::max();
  int i_pos = 0;
  String s;
  for(int i = 0; i < CSpinEdit1->Value; i++)
   {
     a[i] = RandomRange(-99, 100);
     StringGrid1->Cells[i][0] = IntToStr(a[i]);
     if(a[i] < i_min)
      {
        i_min = a[i];
        i_pos = i;
      }
   }
  if(i_pos == 0)
   s = "Минимальный элемент на первом месте. ";
  else
   for(int i = 0; i < i_pos; i++)
    s += IntToStr(a[i]) + ", ";
  s.Delete(s.Length() - 1, 2);
  Label2->Caption = String().sprintf("Минимальный элемент: %d на позиции %d", i_min, i_pos + 1);
  Label3->Caption = "Элементы массива до минимального: " + s;
  delete [] a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CSpinEdit1Change(TObject *Sender)
{
  StringGrid1->ColCount = CSpinEdit1->Value;
}
//---------------------------------------------------------------------------