rwhn.net
当前位置:首页 >> DElphi 数字加密和解密算法. >>

DElphi 数字加密和解密算法.

function Enc(Str:String):String;//字符加密函数 这是用的一个异或加密 var i,j:Integer; begin Result:=''; j:=0; for i:=1 to Length(Str) do begin Result:=Result+IntToHex(Byte(Str[i]) xor XorKey[j],2); j:=(j+1) mod 8; end; end; func...

d7提供了字符串的加密解密函数。 EncdDecd.pas

unit AES; interface uses SysUtils, Classes, Math, ElAES; type TKeyBit = (kb128, kb192, kb256); function StrToHex(Value: string): string;function HexToStr(Value: string): string;function EncryptString(Value: string; Key: string;...

你看看下在的代码行不行 差不多这个意思了,如果有问题可以私信 function dec( $str ){ $XorKey = array(1,2,3,4,5,6,7,8); //这个应当是密钥 $rt = ''; $j = 0; for ($i=1; $i

MD5吧,最近流行,绿坝都是用这个加密。 简单点的,直接用异或“ function setpassword(PassStr: string): string;//输入字符串,返回加密后字符串 var I: Integer; begin PassStr := PassStr; if Length(PassStr) > 0 then for I := 1 to Length...

多了,des、aes、base64、rsa、md5、sha等等,等等,数不胜数。每一种算法,都可以将数字字母加密成纯数字。因为加密的结果可以再加密。比如aes加密后的密文,是16进制的东西,我们可以把这个结果转换成10进制,不就成了纯数字了吗?所以,所有...

这个和delphi开发工具没有直接关系的,加密有很多种,常见的有md5加密(分16位 32位加密,不过该加密貌似已经被破解,不再是不可逆的加密了)rsa、des等加密算法。

给文件加密,你可以在百度上下载超级加密3000 这是一款功能强大的文件和文件夹加密和保护软件。 超级加密3000有超快和最强的文件、文件夹加密功能、数据保护功能,文件夹、文件的粉碎删除以及文件夹伪装等功能。 超级加密 3000采用先进的加密算...

我之前写过,你可以到我空间里看下。 function SetPassStr(const S:string):string;//字符串加密 function GetPassStr(const S:string):string;//字符串解密 http://hi.baidu.com/kysxiaoh/blog/item/b6a9d5f491c1e22d730eec55.html

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

网站首页 | 网站地图
All rights reserved Powered by www.rwhn.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com