摘要： function EncryptKey(sUser,sPasswd:string):string;stdcall;var __i,__k,__a : Integer; __s : string;begin __k := 123456789; for __i := 1 to length(sUser) do begin __a := Ord(sUser[__i]) mod 13 + 1; __k := (__k * __a) mod 9999999 + 1; end; __k := (__k mod 98989898) + 99; for __i := 1 to le... 阅读全文