怎样把字母和符号转换成数字呢???

解决方案 »

  1.   

    如果你要得到ASCII码的话用楼上说的方法就可以了
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var i:integer;
    begin
        i:=integer('[');
        caption:=inttostr(i);
    end;
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    var i,j:integer;
        s:string;
        c:char;
    begin
        s:='sssa';
        c:=''p;
        i:=integer(s[2]);
        j:=integer(c);
        caption:=inttostr(i) + ';' + inttostr(j);
    end;
      

  4.   

    强:) ,如果将 Char 换成 String 呢 ?var i,j:integer;
        s:string;
        c:char; // String