vielen dank, leider funktioniert die von mir angewandte methode nicht, evtl mache ich etwas falsch:
Delphi-Quellcode:
var fs : TFormatSettings;
fs.DecimalSeparator := ',';
fs.ThousandSeparator := '.';
[...]
LWert1.Caption := FloatToStr(a, fs)+' $';
LWert2.Caption := FloatToStr(tun, fs)+' $';
LWert3.Caption := FloatToStr(all, fs)+' $';
es gibt kein fehler beim compilieren, aber die formatierung wird leider nicht angewand )=