Re: [delphi-br] Case When no Delphi

2008-01-24 Por tôpico fabio giro
Qual o BD? Qual a versão do BD? Parece que o problema está na falta de plic´s antes da descrição. Experimente assim: (...) sql.add(' when 1 then ' + + 'CRIANÇA' + ); sql.add(' when 2 then ' + + 'ADULTO' + ); sql.add(' when 3 then ' + + 'IDOSO' + );

Re: [delphi-br] Case When no Delphi

2008-01-24 Por tôpico Leslyn Fernandes
Não sei se estou sendo ingêunuo, mas na primeira linha, sql.add('select flag AS idade');, falta uma vírgula no final... :) Até mais! 2008/1/24 ca_programador007 [EMAIL PROTECTED]: Olá amigos da lista Preciso de uma ajuda meio urgente.. Não sei o que eu estou fazendo de errado. Preciso

Re: [delphi-br] Case When no Delphi

2008-01-24 Por tôpico José Mário Silva Guedes
Foge um pouco ao objetivo do tópico mas sugiro que use Format e QuotedStr para o seu código ficar legível, em especial para outros programadores. Exemplo: SQL.Add(Format('WHEN 1 THEN %s',[QuotedStr('CRIANÇA')])); [As partes desta mensagem que não continham texto foram removidas]

Re: [delphi-br] Case When no Delphi

2008-01-24 Por tôpico Wanderlei - Yahoo
Tenho um exemplo que uso no meu sistema (É C++ Builder, mas é igual no Delphi, basta trocar os - por . ): Estou usando Banco de Dados MySQL. adoqryFrmLancamento-SQL-Clear(); sql = SELECT ; /* Caso o Tipo de Lançamento for = 'D' então pega o próprio valor, SENÂO multiplca o Valor por -1) */ sql