原来delphi5中好像可以直接赋值给integer型的变量就能实现转换了,现在delphi6中编译报错,在Delphi6中用那个函数获取字符ASCII值??   在线等待解答。先谢过了

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
    c:char;
    i:byte;
    begin
    c:=#32;
    i:=byte(c);//取出ascii码值给i
    showmessage(inttostr(i));end;
      

  2.   

    你照着这个变化一下,就可以了。
    关键在于要将char强制转换为byte类型,就是其ascii码值了
      

  3.   

    都不好啊
    用这个了
    保你灵啊
    memo1.text:=inttostr(ord('a'));返回97
      

  4.   

    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      Label1.Caption:=inttostr(Key);
    end;
      

  5.   

    int:i;
    char: c;
    i := ord(c);
      

  6.   

    不管怎么样,谢谢各位进来的朋友了。to : caohonglong2000(chl)
      “关键在于要将char强制转换为byte类型,就是其ascii码值了” 就是这个关键。测试通过,谢谢了。我刚也找了下,用这个方法实现的:
        Temp := pchar(copy(str1,1,1)); 
        c := Temp^;
        ret := ord(c);
    因为我是要转换字符串的字符,这种方法好像存在释放pChar类型的temp的问题。