Mensaje    Asunto: Valores en un ComboBox Responder citando

Estaba usando el código que puso Buildero en asociar un valor a cada item de un combobox, adaptándolo a mis necesidades así:
Código:
TComboBox *Combo = static_cast<TComboBox>(Source);
for (int nItem = 0; nItem <Combo>Items->Count; nItem ++)
{
     Valor = (long)(TObject*)Combo->Items->Objects[nItem];
     if (Valor == Query->FieldByName(Query->FieldDefs->Items[nField]->Name)->AsInteger)
     {
          Combo->ItemIndex = nItem;
          break;
     }
}

La historia es esta: Ejecuto un query, que me devuelve una única fila, y el valor de una de las columnas (que va de -2 a 3) ha de mostrarme el ítem del ComboBox, que tiene 6 elementos, asociado al mismo. El query me devuelve en la consulta que el valor es, por ejemplo, 3 que sería el último de los posibles.

Al ejecutar el código mío la primera vez (nItem = 0) pasa bien; como no es el valor asociado se ejecuta otra vez el bucle, pero al hacer la comparación entre Valor y el query me devuelve un error List index out of bounds (1), ¡y no sé por donde pillarlo! ¿Alguna idea?
_________________
Un saludo

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