Llenar un combobox con los campos de una tabla

[[poliburro]]

Empezado por Lepe

No haría falta ni ejecutar la consulta, creo que esto serviría:

Código Delphi [-]
var q:Tquery;
i:integer;
begin
q := Tquery.create(nil);
q.databasename := 'c:\......';
q.sql.text := select * from tabla;
q.FieldsDef.Update;
with q do
for i:=0 to FieldsDef.Count-1 do
combo.items.Add(Fieldsdef[i].FieldName);
freeandnil(q);
end;




[/saludos]

Pues de hecho esa es una consulta. :|.