Pues creo que lo más directo para saber si un número es entero o no sería usar la función Frac:
Código Delphi
[-]
if Frac(N) = 0 then
ShowMessage('es entero')
else
ShowMessage('no es entero')
Pero por otra parte me llama la atención que sea necesario hacer tal distinción. Si pongo
Código Delphi
[-]
ShowMessage(FormatCurr('###,###,##0.00', 3));
no me marca ningún error.
// Saludos