Como gravar campos da tabela num txt

Opa pessoal, Tenho dois bancos Firebird. Usando os componentes do Delphi, como e possivel eu gravar em um txt o nome das tabelas, do tipo do campo, o nome dos campos , etc? Meio que comparar os bancos em um TXT. Por exemplo, gostaria que escrevesse em um txt o seguinte formato: TabelaTesteBanco1;CampoTesteBanco1;TipoTesteBanco1;TabelaBanco2;CampoBanco2;TipoBanco2 Alguem ajuda? Grato!