要求: inttohex() 这个函数不行。。它返回的类型为string。 需要返回dword 类型!!!
求解答。!!!想了很久没想明白。。唉。。

解决方案 »

  1.   

    不管幾進制數在計算機中都是以二進制存在,返回DWORD類型根本就不用轉,你在顯示時把它顯示成十六進制就可以了。
      

  2.   

    转换后16进制有A,B,C,D,E,F表示不了dword
    可以用Byte数组
      

  3.   

    ...
    你不显示出来,  就没有十进制和二进制之分...
    内存里面都是2进制屏幕上凡是你能看见的 都是字符串 string 和图片 array of Tcolor!
    哪有int?
      

  4.   


    的确,存储的,除了bcd码,都是一样的,与进制无关
      

  5.   

    那如果转换成Byte 了?比如 我函数传递了 12这个数。。我想将12转换成C 然后push 进内存!
      

  6.   

    Delphi中以$数字来表示16进制数

      ShowMessage(IntToStr($12+1));
    结果等于19
    表示16进制的12(就是10进制的18)+1不知道你问的是不是这个意思
      

  7.   


    function RGBToColor(R,G,B:Byte): TColor;
    begin 
    Result:=B Shl 16 Or G Shl 8 Or R;
    end;procedure TForm1.Button1Click(Sender: TObject);
    var r,g,b :integer;
    begin
      r:=strtoint(edit1.text);
      g:=strtoint(edit2.text);
      b:=strtoint(edit3.text);
      form1.color:=rgbtocolor(r,g,b);
      EDIT4.Text:=colortostring(form1.color);
    end;楼主你应该要的这个效果十进制转成16进制,然后再显示出来