Como verificar se o valor da variavel não é inteiro

27/12/2005

Uso uma variavel do tipo double e gostaria de saber como faço para testar se ela possui algum valor na parte decimal.


Exemplo

100,00 normal

100,01 errado


Obrigado e ate mais. :)


Gameiro

Respostas

27/12/2005

Edilcimar

x := 100,01
y:= roundto(x,0)
if x <> y then
faça algo


Responder Citar

27/12/2005

Gameiro

Obrigado Ediclimar

Eu usei a função do Delphi Frac, já resolveu o meu problema



Ate mais. :)


Responder Citar