Get value after decimal separator from floating point number in Delphi

Question

How to get value after decimal separator for given floating point number?

Number: 129.60
Expected result: 60

Answer 1

Just use the Frac function.

For instance, Frac(3.14) equals 0.14. Of course, as soon as you have got rid of the integer part of the number, you can use any method of your choice to make a string out of it, like FloatToStr, FormatFloat, Format, etc.

Answer 2

var
  abobrinha, Expected : real;
begin
  abobrinha := 129.60;
  Expected := abobrinha - trunc(abobrinha);
end;