例如用showmessage显示一个数字(要显示为二进制)

解决方案 »

  1.   

    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls,IdGlobal;type
      TForm1 = class(TForm)
        Button1: TButton;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin
      showmessage(IntToBin(99));end;end.
      

  2.   

    uses
      IdGlobal;
    要有
      

  3.   

    返回结果相当于一个字符串,对字符串进行操作,得到你需要的长度
    可以用copy函数
      

  4.   

    我記得有個
    HexToBin 就可!!