ComboBox y TTable

[Kannon]

Hola a todos.......me gustaría poder llenar un combobox desde una DBgrid he encontrado varios ejemplos pero no he podido aplicarlos a Builder XE5 que es con el que trabajo, les agradezco su ayuda.

[ecfisa]

Hola Kannon.

Ejemplo:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  Table1->Open();
  Table1->DisableControls();
  ComboBox1->Items->BeginUpdate();
  ComboBox1->Items->Clear();
  while (!Table1->Eof) {
    ComboBox1->Items->Add(Table1->FieldByName("Campo")->AsString);
    Table1->Next();
  }
  ComboBox1->Items->EndUpdate();
  Table1->First();
  Table1->DisableControls();
}

Saludos