关于Delphi字符转换的问题。不会啊！！！帮帮忙！！！

关于Delphi字符转换的问题。不会啊！！！帮帮忙！！！ VCL组件开发及应用
http://www.delphi2007.net/DelphiVCL/html/delphi_20061220231901235.html
输入一个任意长的字符串，使用Stringgrid控件显示字符串及其ASCII码。

s:   string;  
   
  s:='abc';  
   
  IntToHex(Ord(s[n]),2);//返回ASCII码十六进制表示   n=1..Length(s)

楼上正确

ord

procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
      s   :   string;  
      i   :   integer;  
  begin  
      s   :=   'asda';  
      StringGrid1.ColCount   :=   length(s);  
      for   i   :=   1   to   length(s)   do  
          StringGrid1.Cells[i-1,1]   :=   IntToHex(ord(s[i]),2)  
  end;

得到答案了吧