saber Item seleccionado en CheckListBox

[lmpadron]

Hola amigos

Tengo una aplicación que se conecta a MySQL, en uno de los campos el usuario pude seleccionar una o mas opciones por lo que uso un CheckListBox donde cargo en la propiedad Items los valores de mi base de datos.
Mi problema es el siguiente.
Necesito saber que Item el usuario seleccionó para agregarlo al DBEdit hasta el momento he tratado pero nada ha funcionado adjunto algo del código que he utilizado pero repito no funciona

for (int i = 0; i < CheckListBox1->Items->Count - 1; i++)
      {
           if (CheckListBox1->State[i]/*[CheckListBox1->ItemIndex]*/ == cbChecked)
           {
                DBEdit1->Text = DBEdit1->Text + "-" + CheckListBox1->ItemIndex ;
           }
           else
           {
                DBEdit1->Text = DBEdit1->Text + "-" + CheckListBox1->ItemIndex;
           }
      }

la idea es realizar un ciclo desde el primer item hasta el ultimo y se verifique cuales están seleccionado y los agregue al DBEdit, esto debe suceder cuando el usuario de un click en el componente para seleccionar una de las opciones.

CODE]void __fastcall TForm5::CheckListBox1Click(TObject *Sender)[/code]

Con ese codigo que acabo de postear obtengo el ItemIndex pero me lo repite tantas veces como Items halla.

Por el momento tengo puesto 8 Items

Gracias de antemano