Mesfistofeles Postado Março 10, 2009 Denunciar Share Postado Março 10, 2009 Boa tarde amigos.Estou fazeno uma rpotina que multiplíca valores que são inseridos no dbedit acontece que:1º No que gera o valor por exemplo "R$:16,20" O CAMPO OTAL MOSTRA 1.620,00 SEGUE ABAIXO O CÓDIGO:Begindatamodule2.adoitenvalortotal.ascurrency := datamodule2.adoitenquant.ascurrency * datamodule2.adoitenvalorunit.ascurrency; end;end. S: Também gostaria que quando o suario colocasse uma medida por exemplo 0,45 pudesse saisse assim:0,45 M² MAS ACONTECE QUE O USUÁRIO SÓ ESTA CONSEGUINDO COLOCAR ASSIM NO CAMPO DO DBEDIT:"45" (Sem 0 e sem vírgula) o código é parecido com o de cima:Begindatamodule2.adoitenmetroquadrado.ascurrency := datamodule2.adoitenlarfura.ascurrency * datamodule2.adoitencomprimento.ascurrency; end;end. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Micheus Postado Março 11, 2009 Denunciar Share Postado Março 11, 2009 (editado) Mesfistofeles, perguntinhas básicas...- qual banco de dados você está usando?- qual o tipo de dados que você usou no banco para este campo?- voce adicionou os campos ao dataset. você mexeu na propriedade Currency do field?- voce colocou alguma formatação na propriedade DisplayFormat?- está usando o método OnGetText de algum destes fields?- a "diferença" de duas casas está sendo visualizada na tela do seu projeto ou quando você confere o valor no banco? Editado Março 11, 2009 por Micheus Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Mesfistofeles Postado Março 12, 2009 Autor Denunciar Share Postado Março 12, 2009 Mesfistofeles, perguntinhas básicas...- qual banco de dados você está usando?- qual o tipo de dados que você usou no banco para este campo?- voce adicionou os campos ao dataset. você mexeu na propriedade Currency do field?- voce colocou alguma formatação na propriedade DisplayFormat?- está usando o método OnGetText de algum destes fields?- a "diferença" de duas casas está sendo visualizada na tela do seu projeto ou quando você confere o valor no banco?boa tarde.Banco de dados ACCESS Tipo de dados numericosim coloquei currency no fieldnão coloquei nenhuma formatação no Display FormatNada de OngetTextAs diferenças sim estão sendo visualizadas Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Micheus Postado Março 13, 2009 Denunciar Share Postado Março 13, 2009 Estou fazeno uma rpotina que multiplíca valores que são inseridos no dbedit acontece que:1º No que gera o valor por exemplo "R$:16,20" O CAMPO OTAL MOSTRA 1.620,00 SEGUE ABAIXO O CÓDIGO:Mesfistofeles, observei que este efeito ocorre no próprio MSAccess (o gerenciador do banco) quando ao invés de usar como separador de decimais a vírgula, usei o ponto.Banco de dados ACCESS Tipo de dados numericosim coloquei currency no fieldSó para constar, no MSAcces o equivalente ao tipo currency (valor monetário) seria o tipo Moeda.No Delphi, usando um TADOTable oo campo Moeda é "traduzido" em um TBCDField:Declaração no Access => No Delphi (Field)Moeda => TBCDFieldNumérico - Duplo => TFloatFieldNumérico - Simples => TBCDFieldNumérico - Decimal => TFloatFieldEu criei uma pequena aplicação para testar este comportamento que você postou e não observei o problema.Utilizei um TADOConnection com provider: Microsoft.Jet.OLEDB.4.0; No banco, os campos VlrUnitario e VlrTotal do tipo Moeda e o campo QtdTotal do tipo Numero - Duplo; Coloquei um DBGrid para monitorar os dados no TADOTable; Dois TDBEdit para editar os campos VlrUnitario e QtdTotal e um TDBText para observar o valor VlrTotal; Não foi utilizada qualquer formatação; No evento OnChange dos campos multiplicados o resultado era atribuido ao total. (se quiser vê-la, envie-me seu e-mail por MP)Abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Mesfistofeles Postado Março 14, 2009 Autor Denunciar Share Postado Março 14, 2009 Boa tarde Micheus.Muito obrigado o problema era que no access estava como número mesmo coloquei moeda e resolveu!Valeu Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Mesfistofeles
Boa tarde amigos.
Estou fazeno uma rpotina que multiplíca valores que são inseridos no dbedit acontece que:
1º No que gera o valor por exemplo "R$:16,20" O CAMPO OTAL MOSTRA 1.620,00 SEGUE ABAIXO O CÓDIGO:
Begin
datamodule2.adoitenvalortotal.ascurrency :=
datamodule2.adoitenquant.ascurrency *
datamodule2.adoitenvalorunit.ascurrency;
end;
end.
S: Também gostaria que quando o suario colocasse uma medida por exemplo 0,45 pudesse saisse assim:
0,45 M² MAS ACONTECE QUE O USUÁRIO SÓ ESTA CONSEGUINDO COLOCAR ASSIM NO CAMPO DO DBEDIT:
"45" (Sem 0 e sem vírgula) o código é parecido com o de cima:
Begin
datamodule2.adoitenmetroquadrado.ascurrency :=
datamodule2.adoitenlarfura.ascurrency *
datamodule2.adoitencomprimento.ascurrency;
end;
end.
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.