// Hex -> Decimal
function ConvertToDecimal(const hexValue: Integer): string;
begin
Result := Format('%d', [hexValue]);
end;
// Decimal -> Hex
function ConvertTohex(const DecimalValue: Integer): string;
begin
Result := Format('%x', [DecimalValue]);
end;