如题

解决方案 »

  1.   

    如果你的16进制数为 i:=$ff,直接用inttobin(i,size);
    如果你的16进制数为 s:='ff',可以用inttobin(strtoint('$'+s),size);function inttobin(i:integer;size:integer):string;
    var
     j: integer;
    begin
      result:='';
      for j:=size-1 downto 0 do
      begin
        if i and (1 shl j)<>0 then
          result:=result+'1'
        else
          result:=result+'0';
      end;
    end;
      

  2.   

    同意 dancedog(猪熔鸡):
    使用函数:
    HexToBin()
      

  3.   

    hextobin返回的与我的inttobin返回的完全不一样。
    比如'ff'转换:hextobin返回的是#$ff,单个字符
                 inttobin返回的是'11111111';
    我想inttobin才适合楼主吧。