Paty, Seu pensamento está totalmente correto, pelo menos eu faria dessa maneira, pois assim seu SELECT não fica muito complexo e seu programa funciona a contento. Exemplo: SELECT COUNT(*) AS TOTAL_REGISTROS FROM DISTRITO, no lugar do asterisco você pode colocar um campo que aparece em todos registros da tabela distrito ou deixar como está acima. Daí o case ficaria da forma que você colocou em sua mensagem.
Abraços, Mauricio C. Vaglieri ----- Original Message ----- From: Paty CL To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 30, 2005 1:20 PM Subject: Re: Re: [delphi-br] Cálculo com Delphi Mauricio, seria algo como: "Select count(*) as Qtde from tabela", onde Qtde pode ser o atributo chave primária, e tabela é o nome da tabela que irei utilizar? Depois disto eu faço um case? "Case Numero_Distrito.AsInteger of 1..6: ER := 0; 7..11: ER := 1; 12..19: ER := 2; 20..26: ER := 3; 27..34: ER := 4; end;" Abraços Paty Maurício Chiarato Vaglieri <[EMAIL PROTECTED]> wrote: Paty, Você não pode fazer um SELECT com um COUNT e tratar o valor retornado no Delphi? Abraços, Mauricio C. Vaglieri ----- Original Message ----- From: Paty CL To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 29, 2005 7:19 PM Subject: [delphi-br] Cálculo com Delphi Pessoal, tenho alguns calculos complexos para fazer no Delphi com firebird. Entram somatório, média aritmética, divisão, multiplicação, entre outros... Nunca fiz nada parecido por isso vou procurar tirar minhas duvidas aki. Para começar vai uma fórmula facinha.. pra quem sabe claro.. Bom a fórmula é a seguinte: EF = EX + EI + ER Para obter o valor de ER eu preciso verificar uma tabela chamada Distrito. Tenho que saber quantos registros a tabela possui, visto que o numero de registro equivale ao numero de distritos. Ou seja, se Numero_Distrito de 01 a 06 = 0 se Numero_Distrito de 07 a 11 = 1 se Numero_Distrito de 12 a 19 = 2 se Numero_Distrito de 20 a 26 = 3 se Numero_Distrito de 27 a 34 = 4..... Alguém me ajuda?! Abraços.... --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília ------------------------------------------------------------------------------ Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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 --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília ------------------------------------------------------------------------------ Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. ------------------------------------------------------------------------------ Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.8.6 - Release Date: 30/03/2005 ---------- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.8.6 - Release Date: 30/03/2005 [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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