Decimal-Separator als Punkt

[burn]

Hallo...

In meinem Programm habe ich den Decimal-Separator auf Punkt umgestellt.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  SysUtils.DecimalSeparator := '.';
end;

Zur Laufzeit mache ich einen Test.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(FloatToStr(123.45));
end;

Das Ergebnis: 123.45 ( wie zu erwarten war)

Sperre ich jetzt aber den Computer und entsperre ihn wieder
und teste nochmal, dann kommt 123,45 raus.
Das heist der Decimal-Separator wurde zurückgestellt.

Warum passiert das? Kann mir das mal einer erklären?


mfg Burn