Einzelnen Beitrag anzeigen

t.roller

Registriert seit: 28. Mär 2016
216 Beiträge
 
#6

AW: Probleme mit FormatSettings.DecimalSeparator

  Alt 10. Jan 2017, 18:37
Zitat:
ms-help://embarcadero.rs_xe7/libraries/System.SysUtils.TFormatSettings.Create.html
Ein TFormatSettings-Datensatz muss vor der Verwendung initialisiert werden. Mit Create können Sie alle Felder gemäß des angegebenen Gebietsschemas füllen.

Delphi-Quellcode:
procedure TForm1.Button11Click(Sender: TObject);
var FS: TFormatSettings;
begin
  FS := TFormatSettings.Create('de-DE');
  Caption:= '1'+ FS.DecimalSeparator+'00';
end;

procedure TForm1.Button12Click(Sender: TObject);
var FS: TFormatSettings;
begin
  FS := TFormatSettings.Create('en-US');
  Caption:= '1'+ FS.DecimalSeparator+'00';
end;
1 Liter Coca-Cola® enthält etwa 26 Würfelzucker (Schweiz) resp. 35 Würfelzucker (Deutschland)
  Mit Zitat antworten Zitat