.. so würde es auch gehen:
Nachkommaanteil:= trunc((frac(FloatValue)*1000);
Zitat von
DelphiHelp:
Returns the fractional part of a real number.
function Frac(X: Extended): Extended;
Description
The Frac function returns the fractional part of the argument X.
X is a real-type expression. The result is the fractional part of X; that is, Frac(X) = X - Int(X).
Grüße
Klaus