-
-
[求助]请教一段算法的逆运算[delphi]
-
发表于: 2008-11-17 16:53
-
这段代码是读取注册表对password键值的解密算法：
size := Reg2.GetDataSize('Password');
GetMem(buf, size);
Reg2.ReadBinaryData('Password', buf^, size);
i := 0;
while i < size - 1 do
begin
password := password + chr(buf[i] xor mask[i]);
Inc(i, 2);
end;
更多的可以看a04K9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8Y4N6%4N6#2)9J5k6e0p5J5x3$3u0G2K9$3g2Q4x3X3g2U0L8$3#2Q4x3V1k6S2M7Y4c8A6j5$3I4W2i4K6u0r3y4q4)9J5k6h3S2@1L8b7`.`. 这里，我找来的...
我想知道加密的算法是什么,麻烦给解释一下，其实这段解密的看的也不是很懂
先谢谢大家
size := Reg2.GetDataSize('Password');
GetMem(buf, size);
Reg2.ReadBinaryData('Password', buf^, size);
i := 0;
while i < size - 1 do
begin
password := password + chr(buf[i] xor mask[i]);
Inc(i, 2);
end;
更多的可以看a04K9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8Y4N6%4N6#2)9J5k6e0p5J5x3$3u0G2K9$3g2Q4x3X3g2U0L8$3#2Q4x3V1k6S2M7Y4c8A6j5$3I4W2i4K6u0r3y4q4)9J5k6h3S2@1L8b7`.`. 这里，我找来的...
我想知道加密的算法是什么,麻烦给解释一下，其实这段解密的看的也不是很懂
先谢谢大家
|
|
|---|---|
|
|
|
|
|
什么一样?
 拜托我没懂-_-! 哪位再来解释下~~
|
|
|
 难道是这段代码太简单没人看得上....?555，难死我了... |
|
|
|
|
|
可是得到的结果不一样哦~’
password为535han7m7d用这个加密后用这个函数解密得到的数据如图  要是还用这个函数加密，得到的完全不对...
|
|
|
|
|
|
 现在不是要解密，而是要把一段明文加密，加密正确与否的标准是用上面给出的那段是否能解密出来...可能是我太笨了...
|
|
|
一樣
.... 
|
|
|
你太强悍了~~-_-!
|
|
|
|
|
|
有自杀的冲动了...这段代码琢磨几天了，没懂，来这里问的结果...汗...
|
|
|
|
|
|
|
|
|
|
|
|
|
