delphi 16进制转10进制

Function HexToDec(const Value :Integer ) : string;

delphi 字符串截取

如果要使用LeftStr,RightStr,MidStr必需引用系统单元StrUtils;