Ich verstehe es leider nicht ganz, aber vom Prinzip her meinte ich das mit Optimieren
http://docwiki.embarcadero.com/CodeE...thods_(Delphi)
Habe versucht, das so umzusetzen
Delphi-Quellcode:
var hexstr,LStr2:WideString;
Ergebnis:Extended;
Erg:^Extended;
...
SetLength(LStr2, Length(hexstr) div 4);
{ Call the hexadecimal to binary conversion procedure. }
HexToBin(PWideChar(hexstr), LStr2[1], Length(hexstr) div SizeOf(Char));
Erg:=@LStr2[1];
Ergebnis:=Erg^;
Wenn ich als Beispiel wieder das hier nehme E17A14AE47613740 kommt nicht 23.38 raus