简单问题：获取字符串的ASCII，将ASCII还原成字符串？

有现成的函数吗？ 问题点数：20、回复次数：6Top

1 楼suny_2001（小鱼儿）回复于 2002-01-08 19:50:40 得分 0

比如A  
   
  showmessage(widechar(65))   Top

2 楼pdsinfo（新手）回复于 2002-01-08 19:56:54 得分 0

-->字符串的ASCII  
              ^^^^^  
  ?  
  ----------------------------  
  var   ch,ch2:char   ;  
          b:byte;  
  ..  
        ch:='A';  
        b:=ord(ch);   //   b=65;  
        ch2:=chr(66);   //   ch2='A'    
  ...  
  Top

3 楼pdsinfo（新手）回复于 2002-01-08 19:58:34 得分 0

sorry!!  
      ch2:=chr(66);   //   ch2='B'     //打错了!   ^$^  
  Top

4 楼CodeDuDu（都都）回复于 2002-01-08 19:58:47 得分 0

我想知道("etli5501ff.`#")这一串字符的ASCII码，用什么函数？Top

5 楼pdsinfo（新手）回复于 2002-01-08 20:25:04 得分 20

procedure   TForm1.Button1Click(Sender:   TObject);  
  var   I:integer;  
          s,t:string;  
  begin  
        s:='';   t:='etli5501ff.#';  
        for   i:=1   to   Length(t)   do   s:=s+t[i]+'-->'+IntToStr(ord(t[i]))+#13;  
        ShowMessage(s);  
  end;Top

6 楼zwjchina（蒲石）回复于 2002-01-08 20:26:02 得分 0

你的问题有点奇怪[     'A'   的ASCII码   为数值65]  
  对与字符串'AAA'你要获取一个什么样的结果？  
  是数值：656565     (获取这个明显是不行的'AAAAAAAAAAAAAAA'对应的数太大了)  
  还是字符串：'656565'Top

相关问题

• 字符串
• 获取
• ascii
• ch2
• ch

• 帖主：CodeDuDu
• pdsinfo

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载