pegar somente valores depois da virgula

13/05/2008

14

Galera é o seguinte estou precisando de pegar um valor ou uma string depois da virgula exemplo

100,23 => gostaria de pegar somente o 23

1,25 => somente o 25

0,03 = somente o 3

tem alguma rotina ou função pronto no delphi 7 pra isso?


Responder

Posts

13/05/2008

Marco Salles

var
 v,r:Extended;
 s:string;
begin
 v:=100.23;
 // pegar um valor
 r:=v - trunc(v);
 //para pegar uma String
 s:=floattostr(r);
 showmessage(s);


Note v,r [b:19c5e63ec0]Extended [/b:19c5e63ec0]..... pois tem uma ´representação´ mais precisa
em relação a outros tipos Nativos do Delphi..


Responder

13/05/2008

Guigosnet

ok deu certo


Responder

14/05/2008

Joaoshi

Colegas, com um esforço menor poderiamos utilizar a funcao [b:e1bd4342cb]FRAC[/b:e1bd4342cb]


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar