Use parametros...a rotina ficaria assim:

DM.IBQuery.Close();
DM.IBQuery.SQL.Clear();
DM.IBQuery.SQL.Add("SELECT * from tabela where cod = :codigo);
DM.IBQuery.params[0].asinteger := 55;
DM.IBQuery.Open();
while not (DM.IBQuery.Eof) do
begin
valor :=DM.IBQuery.FieldValues[vCampo];);

DM.IBQuery.Next;
end

  ----- Original Message ----- 
  From: Tiago de Assis Pimenta 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, April 22, 2007 3:50 AM
  Subject: RES: [delphi-br] problemas com quantidade de registro no Select


  Não seria 


  where cod = 55 ????

  Tiago de Assis Pimenta

  MSN: <mailto:[EMAIL PROTECTED]> [EMAIL PROTECTED]
  SKYPE: tiagopimenta_skype
  GTALK: tiagopimenta


  _____ 

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Vinicius Latini
  Enviada em: domingo, 22 de abril de 2007 03:08
  Para: delphi-br
  Assunto: [delphi-br] problemas com quantidade de registro no Select

  Fala Calera
  estou tendo problemas com a quantidade de registro quando faço um Select no
  banco de dados
  ele mostra que tem apenas um registro quando existe mais

  alguém tem ideia do que pode ser ??

  DM.IBQuery.Close();
  DM.IBQuery.SQL.Clear();
  DM.IBQuery.SQL.Add("SELECT * from tabela where cod 55);
  DM.IBQuery.Open();
  while not (DM.IBQuery.Eof) do
  begin
  valor :=DM.IBQuery.FieldValues[vCampo];);

  DM.IBQuery.Next;
  end

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

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



   


------------------------------------------------------------------------------


  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.463 / Virus Database: 269.5.7/771 - Release Date: 21/4/2007 11:56


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

Responder a