масив структуры, у которой обьявлен масив...

struct avto
{
  int nomer;
  AnsiString name,dor;
}
avto a[10];
 
 int AddStruct(int i)
{
   b=Form4->Edit1->Text; c=StrToInt(b);
   Form3->a[i].nomer=c;
   Form3->a[i].name = Form4->Edit2->Text ;
   Form3->a[i].dor = Form4->Edit3->Text ;
 
 return  i;
}
...
void __fastcall TForm5::Button2Click(TObject *Sender)
{   Form6->ListBox1->Clear();
    if (Form5->RadioButton1->Checked ) 
                {  str=Form5->Edit1->Text;
            aq=StrToInt(str);
            for (int i = 0; i < 10; i++)
        {
            if (Form3->a[i].nomer == aq) 
                          {
              Form6->Label2->Caption=Form3->a[i].nomer;
              Form6->Label4->Caption=Form3->a[i].name;
              Form6->ListBox1->Items->Add(Form3->a[i].dor);
               }
         }
 
              Form5->Visible = false;
              Form6->Visible = true;
   }

Form6->ListBox1->Items->Add(Form3->a[i].s[i]);//тоже безуспешно...