FormatFloat 32bit / 64bit

[Thomas Feichtner]

Hallo zusammen,

ich bekomme beim FormatFloat unterschiedliche Werte angezeigt zwischen 32 und 64bit.

Ich habe folgenden Code:

Code:

procedure TFunctionsTestForm.Button1Click(Sender: TObject);
var
  LvTemp: Variant;
  LsTemp: string;
begin
  LvTemp := 405.405;
  LsTemp := FormatFloat('#,0.00;-#,0.00', LvTemp);
  ShowMessage(LsTemp);
end;

Es wird unter 32 405,40 und unter 64 405,41 was meiner Meinung nach richgig ist angezeigt. Hat jemand schon mal das gleiche Problem gehabt?