Fórum gravar campo com valor truncado 2 casas decimais #235070
29/05/2004
0
ola, estou fazendo uma somatória de parcelas de uma venda e o valor total é 19,7878798 mas quero q o sistema grave no campo apenas com dias casas decimais 19,78 , pois no sistemas ele mostra 19,79 pois estou usando uma mascara com 2 casas decimais,... como faço para mostrar 19,78 obrigado
Alquatisistemas
Curtir tópico
+ 0
Responder
Posts
29/05/2004
Jcmsistemas
Siga Exemplo
Abre um novo Formulario
Adicione um bitbtn e um label
dentro do bitbtn adicione os seguintes codigos
procedure TForm1.BitBtn1Click(Sender: TObject);
var
nvalor, c: currency;
begin
nvalor:= 19.7878978;
c:= (trunc(nvalor * 100))/100;
label1.Caption:= currtostr(c);
end;
Abre um novo Formulario
Adicione um bitbtn e um label
dentro do bitbtn adicione os seguintes codigos
procedure TForm1.BitBtn1Click(Sender: TObject);
var
nvalor, c: currency;
begin
nvalor:= 19.7878978;
c:= (trunc(nvalor * 100))/100;
label1.Caption:= currtostr(c);
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)