MensajePublicado: Mie 28 Ene, 2015 6:21 pm    Asunto: AddItem en ListBox y similares Responder citando
Tengo un CheckListBox que cargo de la siguinete forma:
Código:
Query->Close();
Query->SQL->Text = "SELECT Valor, Literal FROM 'Instalacion.db' WHERE Etiqueta = 'PerPago' ORDER BY Valor";
Query->Open();

CheckListBox1->Items->Clear();
for (; !Query->Eof; Query->Next())
     CheckListBox1->AddItem(Query->FieldByName("Literal")->AsString, reinterpret_cast<TObject*>(Query->FieldByName("Valor")->AsInteger));

y cuando leo el resultado para montar luego un query hago esto:
Código:
AnsiString cAux = "";
for (nItem = 0; nItem < CheckListBox1->Items->Count; nItem ++)
     if (CheckListBox1->Checked[nItem])
          cAux = cAux + FormatFloat("0", (int)reinterpret_cast<TObject*>(CheckListBox1->Items->Objects[nItem])) + ", ";

Pero al salir del bucle en cAux tengo este valor, por ejemplo: "0, 0, 0, "
Y puedo prometer que al cargar el CheckListBox cada ítem tiene un valor diferente (0, 1, 2...)
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)