Listar todos os campos de uma tabela!

veja um exemplo de como se obter o nome e o tipo dos campos.

var i : integer;
campos : string;
begin
campos := ´´;

for i := 0 to table.FieldList.Count -1 do
begin
case table.FieldList.Fields[i].DataType of
ftString : campos := campos + ´|A:´;
ftSmallint, ftInteger, ftWord : campos := campos + ´|I:´;
ftBoolean: campos := campos + ´|B:´;
//... e vai por aí a fora ...
end;

campos := campos + table.FieldList.Names[i];
end

showmessage( campos );
end;

//veja a lista de tipos. tem no help do delphi
type TFieldType = (ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString, ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd);