Forum: Object-Pascal / Delphi-Language
Delphi
by shmia,
10. Aug 2005
Ich bastel gerade noch etwas daran rum....
function HexStringToFloat(const s:string):Extended;
var
i : Integer;
scale : Extended;
begin
Result := 0;
for i := 1 to Length(s) do
begin
if s = '.' then
Forum: Object-Pascal / Delphi-Language
Delphi
by shmia,
10. Aug 2005
Ich habe auch deine Frage nicht richtig gelesen ;-)
StrToFloat erwartet einen String, der nur aus Ziffern, Dezimaltrenner und ggf. Vorzeichen besteht.
Wenn dein Hexstring nicht in einen Integer passt, dann musst du so vorgehen:
function HexStringToFloat(const s:string):Extended;
var
i : Integer;
begin
Result := 0;
for i := 1 to Length(s) do
begin