前加上 $ 的符號, 再使用 StrToInt 即可轉換..
程式碼如下:
代碼: 選擇全部
function HexStrToInt(StrHex: string): integer;
begin
Result := StrToInt('$' + StrHex);
end;
代碼: 選擇全部
function HexStrToInt(StrHex: string): integer;
begin
Result := StrToInt('$' + StrHex);
end;