pegar somente valores depois da virgula

Question

Galera � o seguinte estou precisando de pegar um valor ou uma string depois da virgula exemplo100,23 => gostaria de pegar somente o 231,25  => somente o 250,03 = somente o 3tem alguma rotina ou ...

Marco Salles · Answer

[code:1:19c5e63ec0]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);[/code:1:19c5e63ec0]Note v,r [b:19c5e63ec0]Extended [/b:19c5e63ec0]..... pois tem uma �representa��o� mais precisaem rela��o a outros tipos Nativos do Delphi.....

Guigosnet · Answer

ok deu certo...

Joaoshi · Answer

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