Integer mit tausender trennzeichen ausgeben

[Delphi.Narium]

Meine Lösung dafür ist immer S := Format('%.0n', [MyInteger + 0.0]);