ActiveDelphi

[Williansrg]

Pessoal por favor preciso de uma ajuda... se algume puder me ajudar agradeço...
Como faço pra verificar se um numero eh inteiro ou nao? :casstet:
desde ja agradeço...
Willians
williansrg@hotmail.com

[ale.godoy]

vc pode fazer uma função pra testar isso, mas pode fazer assim pra facilitar

var NUM: integer
begin

try
NUM := strtoint(\'TESTE\');
except
showmessage(\'o valor não é inteiro\');
end;
end;
_________________
<b> Alexandre Godoy
Analista de Sistemas
DBA Firebird/Interbase </b>

[gustavocco]

Se sua variavel for do tipo real, double, etc... e vc qh saber se o conteudo eh do tipo inteiro ou real, uma alternativa seria:

[code]
if Frac(SuaVariavel) > 0 then
Showmessage(\'Real\')
else
Showmessage(\'Inteiro\');
[/code]

Abraço.
_________________
Top System - www.topsystem.com.br