delphi中有没有像java security一样的包，可以实现MD5加密?

Question

D6的Indy Mise控件里有.

Answer 1

主要方法:
CodeString和CompletedInput、GetCodedData。
主要属性是：AutoCompleteInput var
  Input,Output:Stirng;
begin
  Input:='Hello World'
  MD5Coder.AutoCompleteInput:=True;//把加密状态变成自动加密，否则每次取得加密后的字串前必须要先调用CompletedInput。CompletedInput返回的是加密操作的状态，实际是由GetNotification返回
  Output:=MD5Coder.CodeString(Input);//Output中的就是加密后的字串。
end;

Answer 2

希望能对你有帮助。
不过我现在还没有弄清楚如何在D6的MD5Coder里使用密匙。如果你能找到的也通知我一下。

Answer 3

我的情况也是一样，在使用MD5时，要用两个字符串进行加密，所以如果D6中该控件只使用一个字符串进行加密，就太可惜了!

Answer 4

对不起，按照上层三楼的那位朋友的方法，加过密的结果根本不像是字符串，简直是乱码，是不是这种使用方法有误，是不是key的设置有什么讲究？

Answer 5

如按照'unununun'输入了，结果是：''0;S巙'#$1B'?璭eiyF迦'
这肯定是不对的。

Answer 6

CodeString后是乱码！各位帮忙呀