G GRAGON Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-27 #1 例如将字符按位取反,但是要取得回来.请高手示范一下:
Y yaoyao Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-27 #2 var x : char begin x := char(not byte(x)); //字符按位取反，再取反一次得到它本身 ... end;
J jdshoot Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-27 #3 也可以简单地用swap，把字符高4位与低4位交换。 var ch: char; begin ch:= swap(byte(ch)); end. 你也可以再多想些其他办法，比如与特定的字符（或字符数组）做异或（xor）运算，再 异或一次得到原字符，类似于简单的可逆加密。
也可以简单地用swap，把字符高4位与低4位交换。 var ch: char; begin ch:= swap(byte(ch)); end. 你也可以再多想些其他办法，比如与特定的字符（或字符数组）做异或（xor）运算，再 异或一次得到原字符，类似于简单的可逆加密。
L lha Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-27 #4 呵呵，是不是想做个加密算法? 你可以用查表法，XOR等 建议参考 DES算法
