mh5算法在delphi中的实现

来源:百度知道 编辑:UC知道 时间:2024/05/31 14:05:22
我用delphi设计了一程序,在delphi登陆模块中,我想用md5算法来实现数据的加密.后台数据库是access的.

在网上我找到了md5算法的delphi源码.

可是不懂的用.哪位大大可以帮下呀.急啊.

谢谢了.由于本人的积分本身就不多.在这只能给大家这么多了.不好意思.

原码参照:
1:
http://www.it208.com/list1/list1/Delphi/200601/207323.html
2:
http://rtdw.zj51.net/show.aspx?id=218&cid=17

从网上找的Delphi MD5加密的原码好像都是一个版本的,也不知道出自哪位高人之手,下面是原码中主要的几个函数的含义.楼主只要用下面的几个函数就ok了,其他的那么多都可以不用关心,当然,想研究下也可以哈.

1、 MD5String、MD5File、MD5Print、MD5Match这四个函数是供调用的。其他是用来辅助这几个函数的子函数。
2、MD5String为加密字符串。
3、MD5File为加密这个文件。
4、MD5Print是将加密后的密文转换

具体用法如下,另外附上源码:如果是只对密码加密的话,只要调用第2个函数就行了。但要注意函数的类型。如果不匹配的话会出错的。
/*
1、 MD5String、MD5File、MD5Print、MD5Match这四个函数是供调用的。其他是用来辅助这几个函数的子函数。
2、MD5String为加密字符串。
3、MD5File为加密这个文件。
4、MD5Print是将加密后的密文转换成字符串。
5、MD5Match是用来比较密文是否一致。

加密字符串aaa MD5String('aaa')
将加密后的aaa显示出来 MD5Print(MD5String('aaa'))
比较两次密文是否一致