erro de calculo
14/05/2003
0
ola galera .. é o seguinte
tenho q mandar um valor para a impressora fiscal sem virgula e como string, tipo se for 12,34 tenho q mandar 1234 ... utilizo
var:=floattostr(int(DM.ibNotaDINHEIRO.asfloat * 100)
estava dando certo, mas agora não esta mais eheheheh tipo qdo mando
0,30 ele lê como se fosse 0,29
sei disso pq coloque um shomessage antes e um depois e ficou assim
showmessage(DM.ibNotaDINHEIRO.asstring) == deu 0,3
var:=floattostr(int(DM.ibNotaDINHEIRO.asfloat * 100);
showmessage(var), ==== deu 29 [ ou seja como se fosse o,29] ... alguem sabe qual o erro????
tenho q mandar um valor para a impressora fiscal sem virgula e como string, tipo se for 12,34 tenho q mandar 1234 ... utilizo
var:=floattostr(int(DM.ibNotaDINHEIRO.asfloat * 100)
estava dando certo, mas agora não esta mais eheheheh tipo qdo mando
0,30 ele lê como se fosse 0,29
sei disso pq coloque um shomessage antes e um depois e ficou assim
showmessage(DM.ibNotaDINHEIRO.asstring) == deu 0,3
var:=floattostr(int(DM.ibNotaDINHEIRO.asfloat * 100);
showmessage(var), ==== deu 29 [ ou seja como se fosse o,29] ... alguem sabe qual o erro????
Fer
Curtir tópico
+ 0
Responder
Posts
14/05/2003
Okama
Use FormatFloat e pos:
Var Valor:String; begin //Converte Float para String Valor := FormatFloat(´#0.00´, 123.00); //Remove o ponto decimal While pos(´.´,Valor) > 0 do Delete(Valor, Pos(´.´, Valor) , 1);
Responder
Clique aqui para fazer login e interagir na Comunidade :)