[delphi-br] Re: max(code)

2006-07-14 Por tôpico jeannefoliveira
infelizmente nao ta dando certo pessoal. Retirando esse * dá uma
mensagem que nao foi encontrado o campo code. Mas esse campo existe na
tabela.

--- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
[EMAIL PROTECTED] escreveu

 Tira esse '*,' da instrução SQL. Deve ser esse o problema. Sds.
 
 
 From: jeannefoliveira [EMAIL PROTECTED]
 Reply-To: delphi-br@yahoogrupos.com.br
 To: delphi-br@yahoogrupos.com.br
 Subject: [delphi-br] Re: max(code)
 Date: Fri, 14 Jul 2006 15:14:19 -
 
 ta dando erro...
 
 Meu codigo:
  if Query.Active then
 Query.Close;
  Query.SQL.Text := Format('SELECT *, max(code) as maxCode FROM %s',
 [TableName]);
  Query.Open;
 
  code := Query.FieldByName('maxCode').AsString;
 
 
 --- Em delphi-br@yahoogrupos.com.br, Welson Avelar
 [EMAIL PROTECTED] escreveu
  
   --- jeannefoliveira escreveu:
Oi pessoal, to querendo saber o codigo maior de uma tabela mas
nao sei
como receber esse valor.
   
   
To utilizando um ZQuery e o seguinte comando :
   
'SELECT max(code) as Code FROM tabela'
   
mas como faço para pegar esse valor e atribuir a uma variável?
   
   
Obrigado
   [--x--]
  
   [Welson] Simples. Faz a query assim: 'SELECT max(code) as Code FROM
 tabela' e
   depois é só fazer Edit1.Text := ZQuery.FieldByName('Code').AsString;
  
   []s.
  
   =
   O que me preocupa não é o grito dos maus. É o silêncio dos bons.
   Martin Luther King.
   =
   Welson de Avelar Soares Filho
   Analista/Programador Delphi
   Gemini Sistemas
   www.geminisistemas.com.br
   Juiz de Fora - Minas Gerais
   =
  
  
  
   ___
   Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu
 celular. Registre seu aparelho agora!
   http://br.mobile.yahoo.com/mailalertas/
  
 
 
 
 
 
 
 _
 MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br








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

 





Re: [delphi-br] Re: max(code)

2006-07-14 Por tôpico Andrei Luís
Se o banco for Firebird experimenta o seguinte:

Select first 1 code from sua_tabela order by code desc

[]
Andrei

Em 14/07/06, jeannefoliveira[EMAIL PROTECTED] escreveu:
 infelizmente nao ta dando certo pessoal. Retirando esse * dá uma
 mensagem que nao foi encontrado o campo code. Mas esse campo existe na
 tabela.

 --- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
 [EMAIL PROTECTED] escreveu
 
  Tira esse '*,' da instrução SQL. Deve ser esse o problema. Sds.
 
 
  From: jeannefoliveira [EMAIL PROTECTED]
  Reply-To: delphi-br@yahoogrupos.com.br
  To: delphi-br@yahoogrupos.com.br
  Subject: [delphi-br] Re: max(code)
  Date: Fri, 14 Jul 2006 15:14:19 -
  
  ta dando erro...
  
  Meu codigo:
   if Query.Active then
  Query.Close;
   Query.SQL.Text := Format('SELECT *, max(code) as maxCode FROM %s',
  [TableName]);
   Query.Open;
  
   code := Query.FieldByName('maxCode').AsString;
  
  
  --- Em delphi-br@yahoogrupos.com.br, Welson Avelar
  [EMAIL PROTECTED] escreveu
   
--- jeannefoliveira escreveu:
 Oi pessoal, to querendo saber o codigo maior de uma tabela mas
 nao sei
 como receber esse valor.


 To utilizando um ZQuery e o seguinte comando :

 'SELECT max(code) as Code FROM tabela'

 mas como faço para pegar esse valor e atribuir a uma variável?


 Obrigado
[--x--]
   
[Welson] Simples. Faz a query assim: 'SELECT max(code) as Code FROM
  tabela' e
depois é só fazer Edit1.Text := ZQuery.FieldByName('Code').AsString;
   
[]s.
   
=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=


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

 




Re: [delphi-br] Re: max(code)

2006-07-14 Por tôpico Francisco Thiago
 if Query.Active then
Query.Close;
 Query.SQL.Text := Format('SELECT *, max(code) as maxCode FROM %s',
[TableName]);
 Query.Open;

code := Query.FieldByName('maxCode').AsString;



Mude para:



 if Query.Active then
Query.Close;
 Query.SQL.Text := Format('SELECT max(%s.code) FROM 
%s',[TableName,TableName]);
 Query.Open;

code := Query.Fields[0].AsString;


talvez funcione


[]'s


Francisco Thiago de Almeida
Enter  Plug Informática
Divisão: Desenvolvimento e Banco de dados
Franca / SP
msn: [EMAIL PROTECTED]
http://enterplug.no-ip.com/sistema_ctrc/



___ 
Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e 
anti-spam realmente eficaz. 
http://mail.yahoo.com.br/


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