Fórum Formatar valor #327367
13/08/2006
0
Estou precisando converter os dados de um sistema de um concorrente so que os valores ele grava assim
valor gravado - valor que preciso.
0.240000 - 24,00
0.005000 - 0,50
1.298100 - 129,81
2.357200 - 235,72
0.329200 - 32,90
isso esta em uma tabela em DBF..
valor gravado - valor que preciso.
0.240000 - 24,00
0.005000 - 0,50
1.298100 - 129,81
2.357200 - 235,72
0.329200 - 32,90
isso esta em uma tabela em DBF..
Mysys
Curtir tópico
+ 0
Responder
Posts
14/08/2006
Micheus
Como vc não sitou com que tipos de dados está lidando...
[]s
// Se valor gravado for string, acho que começa assim: // substitui ponto por vírgula para possibilitar conversão // aqui 0.240000 passa a ser 0,240000 Vl_Gravado := StringReplace(Vl_Gravado, ´.´, ´,´, []); // converte string para float e multiplica por 100 para ajustar casas // assim, 0.24 passa a ser 24.00 Vl_Convertido := StrToFloat(Vl_Gravado) *100; // se resultado deve ser string, então é só converter denovo Vl_Q_Preciso := FormatFloat(´0.00´, Vl_Convertido);
[]s
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)