FormatFloat : Gerundete ganze Zahlen mit Punkt als Tausendertrennzeichen

[Piro]

Moin zusammen,

ich habe folgenden Code

Delphi-Quellcode:

var
 expected_cat_hours_dollar : Real;
...
expected_cat_hours_dollar := 8991,567;

lbl_expected_cat_hours_dollar.Caption  := FormatFloat(',0', expected_cat_hours_dollar) + ' $';
// Ausgabe : 8992 $

Das Ergebnis ist so wie ich es haben möchte. Es sollen immer ganze Zahlen herauskommen ohne Nachkommastelle und der Tausendtrenner soll ein Punkt sein.

Bin mir nur nicht ganz sicher, ob ich mit ",0" die richtige Formatierung genommen habe. Die Dokumentation zu FormatFloat und die Artikel im Netz haben mich sehr verwirrt und lassen mich zweifel, dass ich es nicht zu 100% richtig gemacht habe.

Wäre schön, wenn mir einer von Euch meinen Code bestätigen kann oder eventuell noch Verbesserung vorschlägt.

Danke im Voraus.
Sven