Re: Extended in Integer Schreiben!
Zitat:
Zitat von Klaus01
.. so würde es auch gehen:
Delphi-Quellcode:
Nachkommaanteil:= trunc((frac(FloatValue)*1000);
Zitat:
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
|
Vielen Dank, und wieder was neues gelernt! :mrgreen:
|