Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Variant-Umwandlung in Single ergibt Integer?!

  Alt 12. Jun 2006, 06:25
Guten Morgen Sven,

die Routinen zur Umwandlung von Varianten sind lokalisierte API Funktionen - sie verwenden die aktuellen locale settings des Systems, aber nicht die Einstellungen der Delphi Unit SysUtils. Bessere Chancen hast du mit Val():

Delphi-Quellcode:
function NativeStrToFloat(s: String): Extended;
var
  error: Integer;
begin
  Val(s, Result, error);
  if error > 0 then
    raise EConvertError.CreateFmt('invalid float format: %s', [s]);
end;
Getippt und nicht getestet.

Grüße vom marabu
  Mit Zitat antworten Zitat