[ecfisa]

Hola frankmaniaz, bienvenido a Club Delphi

Tenes que usar la propiedad Checked que te indica cuando un ìtem està seleccionado, para lo cuàl debes recorrer todos los ìtems del CheckListBox.

Un ejemplo en el que se pasan a un ListBox sòlamente aquellos ìtems seleccionados:

void __fastcall TForm1::btnPasarClick(TObject *Sender)
{
  for(int i=0;i<CheckListBox1->Items->Count;i++)
    if (CheckListBox1->Checked[i])
      ListBox1->Items->Add(CheckListBox1->Items->Strings[i]);
}

Saludos