Найти сумму модулей элементов массива, расположенных после первого отрицательного элемента

int a[8], i,b, rez;
n=StrToInt(Edit1->Text);
        if(n>8){
                ShowMessage("Максимальное количество 8!");
                n=8;
                Edit1->Text = "8";
        }
        StringGrid1->ColCount=n;
 
 
        for(i=0; i<n;i++)
        a[i]=StrToInt(StringGrid1->Cells[i][0]);
        for(i=0; i<n;i++)
 
           if(a[i]<0){
            {b=i; break; } rez=0;
           for (i=b+1; i<n; i++) rez+=fabs(a[i]); }
 
           while(a[i]>=0){ ShowMessage("Не пытайся обмануть программу, хитрец"); break; }
 
 
          Label4->Show();
          if(a[i]<0)Label4->Caption=rez;
          else Label4->Caption="ALARM, МУХЛЮЕШЬ, АХАХХА";
         }

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  randomize();
  StringGrid1->ColCount = UpDown1->Position;
  int *A = new int[UpDown1->Position];
  int Summ = 0;
  bool Negative = false;
  for(int i = 0; i < StringGrid1->ColCount; i++)
   {
     StringGrid1->ColWidths[i] = (int)StringGrid1->Width / UpDown1->Position - 2;
     A[i] = -100 + Random(200);
     StringGrid1->Cells[i][0] = IntToStr(A[i]);
     if(A[i] < 0 && Negative == false)
      {
        Label2->Caption = String().sprintf(L"Первый отрицательный элемент массива: %d на позиции %d", A[i], i);
        Negative = true;
        continue;
      }
     if(Negative) Summ += abs(A[i]);
   }
  if(!Negative)
   {
     ShowMessage("В массиве отсутствуют отрицательные числа!\nПовторите процедуру заполнения массива!");
     Label2->Caption = "В массиве отсутствуют отрицательные числа!";
   }
  Label3->Caption = String().sprintf(L"Сумма модулей элементов массива, следующих за первым отрицательным: %d",Summ);
  delete [] A;
}