A aaaaa Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #1 做一段加密字符串的代码，要求写入TXT文件中。显示为乱码。 各位高手，最好有一个好算法。不需要移动ascii的例子。
T taozhiyu Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #2 give me your email.i send you a sample
A aaaaa Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #3 dlong2002@sohu.com,先谢谢了。我一直没有好的方法。
Z zhoujg Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #4 function Encrypt(const Password, Key: string): string; var i: Integer; begin SetLength(result, Length(Password)); for i:=1 to Length(Password) do result := Chr(Ord(Password) xor Ord(Key[i mod Length(Key)])) end;
function Encrypt(const Password, Key: string): string; var i: Integer; begin SetLength(result, Length(Password)); for i:=1 to Length(Password) do result := Chr(Ord(Password) xor Ord(Key[i mod Length(Key)])) end;
B bubble Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #5 显示为乱码??? 什么是乱码,还是打乱的字符串? 加密算法我给你找找,我这里好多阿. 都是在delphi爱好者上面抄的.
