Delphi - Nombre de campos en un combo

Como puedo colocar los nombre de los campos de una tabl en un combobox... gacias

var
Uses
DB,DBTables, DbiProcs, DbiErrs,DbiTypes ......

K:Integer
begin
for K := 0 to Table1.FieldCount - 1 do
begin
Combobox1.Items.Add( Table1.FieldDefs.Items[k].Name)+' de Tipo '+
GetFieldType(Table1.FieldDefs.Items[k].DataType);

gracias

No me quere mostrar nada

La forma más fácil: utiliza el método GetFieldNames de la clase TDataSEt: Ejemplo:

Table1.GetFieldNames(ListBox1.Items);

Esta línea rellena un ListBox (ListBox1) con los nombres de los campos de Table1.

Lo tienes en la ayuda.