Bug in StrToInt64 ?!

[Blizzard]

Hallo,

ich hab folgendes Problem, ich lese aus einer datei 8 Byte hexzahlen aus und will diese in einen int64 wert konvertieren, was eigentlich genau dessen wertebereich ist. Soweit die Theorie.

Mein Problem ist jetzt das ich z.B. beim wert $FFFFFFFFFFFFFFFF (=-1) die Fehlermeldung bekomme, dass dieser Wert keine gültige integer zahl ist, obwohl diese eigentlich noch im bereich von int64 liegt.

Man kann das auch ganz einfach Nachvollziehen:

Delphi-Quellcode:

procedure Test();
var
    t, t2: int64;
    tStr : String;
begin
    t := -1;
    tStr := inttohex(t,20);
    ShowMessage(tStr);
    t2 := strtoint64('$'+tStr); //Hier gibts dann die Exception
    ShowMessage(inttostr(t2));
end;

Ich verwende gerade Delphi 6. Kennt jemand diese Problem und vielleicht auch noch ein Workaround. Oder kann mir jemand sagen wo ich eine bessere strToInt64 funktion herbekomme die mit diesen werten zurechtkommt?

mfg
Blizzard

[turboPASCAL]

:gruebel: $FFFFFFFFFFFFFFFF = 1,84467440737096E19

HexStringToFloat

[Blizzard]

Das liegt daran das Float ne andere Hex Representation hat als Integer

[turboPASCAL]

Autsch, Richtig. Sorry! :oops:

Delphi-Quellcode:

var
  t, t2: int64;
  tStr : String;
begin
  t := -1;
  tStr := inttohex(t, 20);
  t2 := strtoint64('$'+ tStr);

  ShowMessage(tStr + ' <-> ' + inttostr(t2));
end;

Funktioniert bei mir ohne Fehler. ( D6pe )

[Blizzard]

Hast du irgendwelche Updates installiert oder sowas in der Art?

Ich arbeit hier nämlich leider ohne irgendwas derartiges. Die Firma hier bekommt das nämlich einfach ned gebacken. :wall:

[Bernhard Geyer]

Zitat:

Zitat von Blizzard

Hast du irgendwelche Updates installiert oder sowas in der Art?

Ich arbeit hier nämlich leider ohne irgendwas derartiges. Die Firma hier bekommt das nämlich einfach ned gebacken. :wall:

D6 ohne Updates - Auweia. Da waren doch durch den CLX/Kylix-Ausflug noch einige Hammer-Bugs vorhanden.

[turboPASCAL]

Ja alle zu D6 (PE-Version)

DELPHI DEVELOPER SUPPORT