ASC码61是a,那么ASC码AA是什么?delphi中如何传送ASC码?

                            
var   
      Tempstr:pchar;  
      content:string;  
      a:integer;  
  begin  
          for   a:=0   to   59   do  
          content:=content+'x';  
          for   a:=0   to   2   do  
          begin  
          TempStr:=pchar('AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+content);       //我想把AA的位置,变成传送ASCII码AA,如何实现?  
          socket.SendText(TempStr);  
          end;  
  end;

查看回复