Hola...
Los componentes
TIBQuery tienen una propiedad llamada
Fields la cual puedes consultar para obtener la lista de campos:
Código Delphi
[-]
var
I: Integer;
begin
for I := 0 to Pred(IBQuery1.Fields.Count) do
CheckListBox1.Items.Add(IBQuery1.Fields[i].FieldName)
end;
Saludos...