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 >>>>>
<*> 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
