Estrutura de tabela Access

[Guest Programando]

Boa tarde, preciso saber se tem como fazer pelo Delphi 7 o seguinte

Quero pegar os nomes de campos de uma tabela, eu até consegui isto, mas os campos vieram em ordem alfabética, e não na ordem original da tabela, pois a minha intenção é pegar o nome do campo e o formato aceito pelo campo. ex

Codigo integer(10),

Nome Varchar(50),

Endereco Varchar(50);

mais ou menos isso, pois entou tentando fazer um backup de access parecido com o que o MySqlDump faz, copia os campos e sua estrutura para um txt, depois copia os dados desses campos, separados por vírgula, no backup.

A minha dificuldade é esta, pegar o nome na ordem da tabela e o formato do campo.

[Pirambu!]

Amigo, acredito que a melhor forma seria utilizando uma AdoQuery para lista os itens da tabela e colocar na forma desejado.

[Guest Programando]

Valeu, para o nome dos campos da certo, e agora, como eu faço para pegar os formatos aceitos pelos campo, tipo, qual é integer e o se tamanho, varchar ou string e seu tamanho.

[Pirambu!]

Para pegar os Valores é bem mais simples você faz assim

Var
Valor01,Valor02,Valor03:String;
Begin

Valor01 := Query1Campo1.AsString;
Valor02 := Query1Campo2.AsString;
Valor02 := Query1Campo3.AsString;

end;

ve se isso ajuda, e para Salvar em Txt da uma olhada neste link abaixo:

Link TXT

[Guest Programando]

Olá, acho que houve um equívoco, na verdade eu quero pegar o formato de dados que cada campo está configurado para receber, tipo

Codigo -> Integer(10),

Nome -> Varchar(50);

Para depois quando eu for recriar o banco, eu crie cada campo no seu formato de dados original, ou seja, igual ao que está atualmente no banco.