Помогите правильно написать

[ChiefAccent]

Хочу сделать так, чтобы по нажатию по логину в ListBox`e выводило в Edit`ы информацию из базы по столбцам

PHP код:

String* Logins;
String* Password;
String* Family;
String* Imya;
String* Surname;


int CountLogin = 0;
int CountPassword = 0;
int CountFamily = 0;
int CountImya = 0;
int CountSurname = 0;
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Logins = new String[1000];
Password = new String[1000];
Family = new String[1000];
Imya = new String[1000];
Surname = new String[1000];

    String QWERY = "SELECT Users.Login, Users.Password, Users.Famliy, Users.Name, Users.Surname FROM Users";

    Form2->ADOQuery1->Active=false;
    Form2->ADOQuery1->SQL->Clear();
    Form2->ADOQuery1->SQL->Add(QWERY);
    Form2->ADOQuery1->Active = true;

      CountLogin = 0;
    ListBox2->Clear();
    while (!Form2->ADOQuery1->Recordset->Eof)
    {
        //получаем логин
                ListBox2->Items->Add(Form2->ADOQuery1->Fields->Fields[0]->Value);
        Logins[CountLogin]  =  Form2->ADOQuery1->Fields->Fields[0]->Value;
               //    Edit2-> Items->Add(Form2->ADOQuery1->Fields->Fields[1]->Value);
        Password[CountPassword]  =  Form2->ADOQuery1->Fields->Fields[1]->Value;
               //    Edit3->Items->Add(Form2->ADOQuery1->Fields->Fields[2]->Value);
        Family[CountFamily]  =  Form2->ADOQuery1->Fields->Fields[2]->Value;
               //    Edit4->Items->Add(Form2->ADOQuery1->Fields->Fields[3]->Value);
        Imya[CountImya]  =  Form2->ADOQuery1->Fields->Fields[3]->Value;
              //    Edit5->Items->Add(Form2->ADOQuery1->Fields->Fields[4]->Value);
        Surname[CountSurname]  =  Form2->ADOQuery1->Fields->Fields[4]->Value;


         CountLogin++;
         CountPassword++;
         CountFamily++;
         CountImya++;
         CountSurname++;
       Form2->ADOQuery1->Next();
    }
}