[__cadetill]

Pues mirando un poco la ayuda de TFields podemos sacar el código de forma fácil. Quedaría algo así

ComboBox1.Items.Clear;
for i := 0 to Tabla.Fields.Count - 1 do
  ComboBox1.Items.Add(Tabla.Fields[i].FieldName);