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

Delphi

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

Gameiro

Curtidas 0

Respostas

Edilcimar

Edilcimar

27/12/2005

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


GOSTEI 0
Gameiro

Gameiro

27/12/2005

Obrigado Ediclimar

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



Ate mais. :)


GOSTEI 0
POSTAR