como saber quais os campos que existem em uma Tabela

Delphi

03/10/2006

salve galera,

tem como saber quais os campos que existem em uma determinada tabela ?


Delphi 7 <-> ADO <-> Firebird 1.5


Fabiano Góes

Fabiano Góes

Curtidas 0

Respostas

Gardel

Gardel

03/10/2006

Olá caro colega...

Eu costumo fazer assim, mais não uso ado uso DBExpress, mais creio que deve ser no mesmo estilo.

var 
  i: integer;
  vListaCampos: var of string;
begin
  SetLength(vListaCampos,MinhaTabela.FieldCount)
  for i := 0 to MinhaTabela.FieldCount - 1 do
    vListaCampos[i] := MinhaTabela.FieldList.Fields[i].FullName;
end;


Bem assim eu coloco todos os meus campos numa array de string...

Você pode substituir a propriedade FullName por DisplayName, assim se seu campo se chama CodCli, mais no dataset vc definiu com o Nome código o q vai pra array é o campo código. com fullname vai o nome original do campo.

Espero poder ter ajudado...

Até mais.


GOSTEI 0
Fabiano Góes

Fabiano Góes

03/10/2006

Gardel, valeu cara pela dica !!!

sem querer abusar mais já a busando da sua boa vontade :lol: :

como faço pra jogar esses campos em uma String, separando-os por virgula ´,´ ??

desde já agradeço !!!


GOSTEI 0
Fabiano Góes

Fabiano Góes

03/10/2006

cara,

Jogar os Fields em uma string separando por virgula eu consegui :wink:

agora:

[b:8bf0f782ac]Tem como pegar o field e o type de cada filed ???[/b:8bf0f782ac]


GOSTEI 0
POSTAR