ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Arredondamento...

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
eversonluis
Novato
Novato


Registrado: Sexta-Feira, 9 de Novembro de 2007
Mensagens: 79

MensagemEnviada: Sex Fev 26, 2010 1:23 pm    Assunto: Arredondamento... Responder com Citação

Ola, boa tarde pessoal deste forum...
Estou com um problema no Banco de dados (FIREBIRD 2.1), que e o seguinte:
Os campos que deverao ter pontos decimais eu os fiz desta maneira:
VALOR NUMERIC(15,2), ate ai tudo bem, acontece que o campo valor, as vezes recebe na sua variavel de memoria por exemplo um valor
3,7861, ai eu vou no registro deste campo, ele esta como 3,78...
Mas quando processo um relatorio, os valores vao 3,78...e nao vai 3,79


A Pergunta e: Tem como deixar o banco como dois digitos por completo ou isso pode ser feito no Delphi, por exemplo no clipper tem uma chamada assim SET EXACT TO 2 ( deixando tudo com duas casas decimais...)
Valeu
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9099
Localização: Sinop-MT

MensagemEnviada: Sex Fev 26, 2010 1:26 pm    Assunto: Responder com Citação

no uses, adicione math

na programacao:

Valor := RoundTo(Valor, -2); // 2 casas
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
eversonluis
Novato
Novato


Registrado: Sexta-Feira, 9 de Novembro de 2007
Mensagens: 79

MensagemEnviada: Sex Fev 26, 2010 3:25 pm    Assunto: Agradecido Responder com Citação

Valeu Joemil, pela dica...muito obrigado
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB