Bom dia,
tenta assim
qryProdutos.Close; <-- inclua isto antes de limpar a query
qryProdutos.Sql.Clear;
qryProdutos.SQL.Add ('select * from Produtos');
qryProdutos.SQL.Add ('where TIPCAP = :TIPOP');
qryProdutos.Params [ 0 ].DataType := ftstring;
qryProdutos.Params [ 0 ].Value := dbrSelTipProd.ItemIndex
===============================
Emilio C�rdova Silva
[EMAIL PROTECTED]
[EMAIL PROTECTED]
(41) 9228-7414
----- Original Message -----
From: "lucaoliveira7" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Tuesday, February 01, 2005 8:43 PM
Subject: [delphi-br] DataSet Open
Pessoal � o seguinte, estou montando esse SQL din�micamente o
problema � que todas as vezes que chega na primeira linha Add aparece
msg de erro DataSet Open
qryProdutos.Sql.Clear;
qryProdutos.SQL.Add ('select * from Produtos');
qryProdutos.SQL.Add ('where TIPCAP = :TIPOP');
qryProdutos.Params [ 0 ].DataType := ftstring;
qryProdutos.Params [ 0 ].Value := dbrSelTipProd.ItemIndex;
Grato
--
<<<<< 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] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.4 - Release Date: 01/02/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.4 - Release Date: 01/02/2005
--
<<<<< 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] ou [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
