Hi, versuche das mal hiermit:
Delphi-Quellcode:
var
n,x:integer;
begin
n := c.Fielddefs.Count;
tdbcombobox(sender).Items.clear;
for x := 0 to n-1 do
tdbcombobox(sender).Items.Add(c.Fielddefs.Items[x].Name);
wobei c der Name der Tabelle ist!
Gruß Matthias