[mierda]

ahora mismo lo acabo de hacer pa mi:

CBcampos.Items.clear;
for i:=0 to datos.Qselector.FieldCount -1 do
begin
CBcampos.items.Add (datos.Qselector.FieldList[i].DisplayName);
CBcampos.ItemIndex := 0;
end;


un saludo