Zentimeter als Meter ausgeben -> Wie?

[Headbucket]

Zitat von baumina:

EDIT: Ich weiß nicht seit wann es die überladene Funktion mit den FormatSettings gab. Gibt es die noch nicht, dann nimmt man die globale Variable DecimalSeparator.

Im Delphi 2007 gab es sie jedenfalls noch nicht. Hier muss man die globale Variable verwenden.
Dann wurden eine Zeit lang beide Varianten parallel geführt (mit der Erweiterung "deprecated").
In meinem Delphi XE5 gibt es die globale Variable nun gar nicht mehr.

Grüße

[Der schöne Günther]

Doch, die steckt in System.SysUtils .

[DeddyH]

Man kann aber auch komplett ganzzahlig rechnen, wenn man das möchte:

Delphi-Quellcode:

procedure TFormTest.ButtonCMClick(Sender: TObject);
const
  CM = 183;
  CM_PER_METER = 100;
begin
  ShowMessage(Format('%d.%d', [CM div CM_PER_METER, CM mod CM_PER_METER]));
end;

[himitsu]

Nicht die führende 0 vergessen
101 = 1.1
110 = 1.10

ShowMessage(Format('%d.%.2d', [CM div CM_PER_METER, CM mod CM_PER_METER]));

[DeddyH]

Japp, übersehen.