/ Published in: Delphi
Works great ;)
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
function hexaToInt(s : string) : Int64; begin if (s <> '') and (s[1] <> '$') then result := strToInt64('$' + s ) else result := strToInt64(s); end;