function  Decrypt(const   s:string):string;   //加密
var
  I:Integer;
begin
  Result:='';
  for  i:=1   to   length(s)   do
    result:=result+chr(ord(s[i])   xor   i   xor  69);
    result:=result   +   char(69);

解决方案 »

  1.   

    我知道 XOR 是异或
      

  2.   

    取字符串中每个字符的asc码与这个字符在字符串中的位置取异或~~
    再把此ACS码还原为字符最后返回运算后的字符串
    是一个按位取异或的字符串加密函数
      

  3.   

    谢谢楼上的回答
    xor i 是 字符串中的位置取异或
    那XOR 69 呢?谢谢 
    这个帮我也解释下 行吗?
      

  4.   

    当然是经过两次异或呀~~
    69是E的asc码~~~
      

  5.   

    o(∩_∩)o...哈哈  谢谢你了
    是以E 结束的太感谢了 
      

  6.   

    brightyang  不好意思 
    CSDN 改版了 不知道怎么给分了我进到帖子管理了 然后点哪个啊