IntToHex(10-16进制的转换)

洳菓可以韭

洳菓可以韭

2016-02-19 16:22

下面图老师小编要向大家介绍下IntToHex(10-16进制的转换),看起来复杂实则是简单的,掌握好技巧就OK,喜欢就赶紧收藏起来吧!
对那个10-2进制转换的程序,我很高兴很多朋友都提供了比我要简洁的好方法,这是看到一位朋友的BLOG后,写的10-16的转换,一开始我还写错了,呵呵,现在将正确的留在网志,他要求是自己写转换而不是利用类似
  Format('Integer %0:d in Hex is %0:.8x', [Value]);
  当然,有简单方法我们要用简单方法哦接着介绍自己的方法
  var HexArr: array[1..15]of string= ('1','2','3','4','5','6','7','8','9','A','B','C','D','E','F');

  function Int2Hex(Value: Integer): string;
  var
    iTemp: Integer;
    i: Integer;
  begin
    Result := '';
    i := 0;
    while i4 do
    begin
      case i of
        0: iTemp := Value shr 24 and $FF;
        1: iTemp := Value shr 16 and $FF;
        2: iTemp := Value shr 8 and $FF;
        3: iTemp := Value and $FF;
      end;
      if not Boolean(iTemp) then Result := Result + '00'
      else begin
        Result := Result + HexArr[iTemp div 16];
        Result := Result + HexArr[iTemp mod 16];
      end;
      Inc(i);
    end;
  end;
  
  测试:ShowMessage(Int2Hex(-1)); //显示FFFFFFFF
             ShowMessage(Int2Hex(MAXINT)); //显示7FFFFFFF 
  
  希望大家多提意见,个人觉得挺简洁明了了,呵呵,很明显每步在做什么

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)
展开更多 50%)
分享

猜你喜欢

IntToHex(10-16进制的转换)

编程语言 网络编程
IntToHex(10-16进制的转换)

VC++ 中实现进制2进制10进制16进制的相互转换

编程语言 网络编程
VC++ 中实现进制2进制10进制16进制的相互转换

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

IntToBin(2-16进制转换函数)

编程语言 网络编程
IntToBin(2-16进制转换函数)

无限进制转换

编程语言 网络编程
无限进制转换

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

各种进制转换方法

电脑入门
各种进制转换方法

c#实现16进制和字符串之间转换的代码

编程语言 网络编程
c#实现16进制和字符串之间转换的代码

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

ASP入门基础教程-ASP概述

ASP入门基础教程-ASP概述

关于COM+的一些细节问题

关于COM+的一些细节问题
下拉加载更多内容 ↓