tá blz seu código ! mais mesmo assim se voce quiser trabalhar diretamente com os field's pode dar um fieldDef neles.
abraço. - - - - att' Paulo Batalhão arphanet.com <http://www.arphanet.com/> batalhao.eti.br <http://www.batalhao.eti.br/> saudeamericana.com.br <http://www.saudeamericana.com.br/> fusame.com.br <http://www.fusame.com.br/> "Não existe patch para a estupidez humana" ----- Original Message ----- From: "gustavohenriquephn" <[EMAIL PROTECTED]> To: <delphi-br@yahoogrupos.com.br> Sent: Friday, September 22, 2006 10:10 AM Subject: [delphi-br] Re: Adicionar Fields em Query Run-Time ... Paulo, os campos das tabelas mudam sempre, estou pensando em fazer assim var qryTemp : TQuery; begin qryTemp := TQuery.Create(nil); qryTemp.SQL.Clear; qryTemp.SQL.Add('select * from "c:\sistemas\folha\f05_empg.DBF"'); qryTemp.Open; qryTemp.Close; FreeAndNil(qryTemp); end; Alguém já fez algo parecido ? --- Em delphi-br@yahoogrupos.com.br, Paulo Batalhão <[EMAIL PROTECTED]> escreveu > > tá na mão ! > > //== > // tente algo parecido a isso. > > var > cldDados: TClientDataSet; > begin > cldDados := TClientDataSet.Create(Nil); > cldDados.FieldDefs.Add('CODIGO', ftInteger); // Campo do tipo > Inteiro > cldDados.FieldDefs.Add('DESCRICAO', ftString, 50); // Campo do tipo String > cldDados.CreateDataSet; > end; > > //== > // Espero ter ajudado. > > - - - - > att' Paulo Batalhão > arphanet.com <http://www.arphanet.com/> > batalhao.eti.br <http://www.batalhao.eti.br/> > saudeamericana.com.br <http://www.saudeamericana.com.br/> > fusame.com.br <http://www.fusame.com.br/> > > "Não existe patch para a estupidez humana" > ----- Original Message ----- > From: "gustavohenriquephn" <[EMAIL PROTECTED]> > To: <delphi-br@yahoogrupos.com.br> > Sent: Friday, September 22, 2006 9:51 AM > Subject: [delphi-br] Adicionar Fields em Query Run-Time ... > > > Pessoal normalmente quando faço a Query das minhas aplicações vou até > o datamodule adiciono uma Query coloco em sql select * > from "c:\sistemas\teste\aaa.DBF" depois clico duas vezes sobre a > tquery e vou em add all fields > > preciso criar em tempo de execução, uma forma que passando o SQL tenho > q criar os campos automaticamente neste TQuery alguém imagina alguma > forma ? > > > > > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > Links do Yahoo! Grupos > > > > > > > > > > > -- > Este e-mail está livre de vírus. > Verificado por AVG Anti-Vírus. > Versão: 7.1.407 / Banco de dados de Vírus: 268.12.8/455 - Data de > Lançamento: 22/9/2006 > -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Links do Yahoo! Grupos -- Este e-mail está livre de vírus. Verificado por AVG Anti-Vírus. Versão: 7.1.407 / Banco de dados de Vírus: 268.12.8/455 - Data de Lançamento: 22/9/2006 -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
