DBListBox y DBEdit

[ecfisa]

Hola fabiodidone.

No nos das mucha información... Pero me pregunto si no te resultará mas sencillo usar un TComboBox en lugar de un TDBComboBox en este caso,

Código PHP:

...
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  TComboBox* cb = static_cast<TComboBox*>(ComboBox1);

  cb->Items->CommaText = "JF,AU,RE,EX,VE";
  cb->Style = csDropDownList;
  cb->ItemIndex = 0;
  cb->OnChange  = ComboBox1Change;
}

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
  TComboBox* cb = static_cast<TComboBox*>(Sender);

  if (cb->ItemIndex != -1 ) {
    AnsiString v[] = {"JEFE","AUXILIAR","RECEPCIONISTA","EXPEDICION","VENTAS"};
    TDataSetState status = DBEdit1->DataSource->DataSet->State;

    if ( !(status == dsEdit && status == dsInsert) )
       DBEdit1->DataSource->DataSet->Edit();
    DBEdit1->Field->AsString = v[cb->ItemIndex];
  }
}
... 


Saludos