Não sei se é isto o que vc quer mais segue ai

//Retornar Fileds de uma tabela
ClientDataset1.GetFieldNames(Listbox1.Items);


//Função para Retornar o Tipo de Campo
function TipoCampo(Campo: TFieldType): String;
begin
case campo of
ftFixedChar : Result :='TEXTO';
ftWideString : Result :='TEXTO';
ftString : Result :='TEXTO';
ftMemo : Result :='MEMORANDO';
ftBlob : Result :='MEMORANDO';
ftUnknown : Result :='TEXTO';
ftInteger : Result :='INTEIRO';
ftFloat : Result :='NUMERO';
ftBCD : Result :='VALOR';
ftAutoInc : Result :='INTEIRO';
ftDate : Result :='DATA';
ftDateTime : Result :='DATA';
else
Result :=Result;
end;
end;



2009/10/22 Fellipe Henrique <felli...@gmail.com>

>
>
> Amigos, tenho uma classe, com diversos Fields... queria poder dar um for
> nos
> Fields e pegar os nomes, e que tipo são eles... isso existe? é possível?
>
> Obrigado.
>
> --
> _________________________________
> T.·.F.·.A.·.
> Fellipe Henrique
> ----------------------------------------------------------
> CAMPANHA POR UMA INTERNET SEGURA
> Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
> mensagens use SEMPRE o "Cco" (cópia oculta).
> Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
> um e-mail, delete todas as informações que apareçam no corpo do e-mail e
> que
> possam ser usadas por hackers.
> #######################################
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


[As partes desta mensagem que não continham texto foram removidas]

Responder a