RSS订阅 | 匿名投稿
您的位置:网站首页 > 加密

DELPHI SHA1加密函数

usesSystem.SysUtils,System.Types,System.UITypes,System.Classes,System.Variants,FMX.Types,FMX.Con****ols,FMX.****s,FMX.Graphics,FMX.Dialogs,Androidapi.JNI.GraphicsContentViewText,Androidapi.JNIBridge,A…
类别:加密 标签: 作者:admin 日期:2018-01-18 08.05.47

Delphi 字符串加密与解密函数

EncdDecd单元:EncodeString、DecodeString、EncodeBase64、DecodeBase64usesEncdDecd;conststr='万一的Delphi博客';procedureTForm1.Button1Click(Sender:TObject);varstrEncode,strDecode:string;beginstrEncode:=E…
类别:加密 标签: 作者:admin 日期:2018-01-12 20.02.12

Delphi Base64编码/解码及ZLib压缩/解压

最近做项目用到Base64编码及ZLib压缩,发现Delphi自带的Base64编码与java的Base64编码不一致,找了很多方法才解决这个问题,在这里来作一些总结:压缩方法:S****ToBase64(AnsiS****ing(GZCompressS****(s****)));解压…
类别:加密 标签:Base64 作者:admin 日期:2018-01-09 08.02.49

delphi 使用 LockBox 做加密解密

Delphi提供的加密解密控件中,LockBox是一套非常优秀的开源控件。其前身是TruboPowerLockBox是一套商业控件。LockBox到Version2的时候决定开源。因此有LockBox2,和之前的商业控件完全一样。后来,有人另外写了一套,…
类别:加密 标签: 作者:admin 日期:2018-01-05 14.16.57

Delphi中的SHA256算法

在Delphixe中可以直接使用TIdHashSHA256来实现SHA256算法,代码如下usesIdHashSHA,IdSSLOpenSSLHeaders;varSHA256:TIdHashSHA256;SHA256:=TIdHashSHA256.Create;Password_p:=LowerCase(SHA256.HashStringAsHex(Passw…
类别:加密 标签: 作者:admin 日期:2018-01-03 22.27.31

delphi EXE文件自效验

varstream:TMemoryStream;CrcValue,OldCrcValue:DWORD;exename:string;WriteBuf:array[0..3]ofByte;beginCRCValue:=$FFFFFFFF;//预设WriteBuf[0]:=$00;WriteBuf[1]:=$00;WriteBuf[2]:=$00;WriteBuf[3]:=$00;exename:…
类别:加密 标签: 作者:admin 日期:2018-01-02 14.37.52

Delphi XE8 支持MD5

XE8新带了一个单元文件:System.Hash,其实,实现了三个类,分别是:THashTHashMD5THashSHA1原生实现对MD5及SHA1的支持!以MD5为例,很容易取一个串的MD5值。procedureTForm40.Button2Click(Sender:TObject);varmd5:TH…
类别:加密 标签: 作者:admin 日期:2015-12-14 22.36.18

Delphi XE6 android 实现Base64字符串的解析

介绍本文章介绍了DelphiXE6实现Base64字符串的解析,首先将Base64字符串转换成TStringStream,然后将TStringStream字符串转换成UTF8.具体代码procedureTForm1.Button1Click(Sender:TObject);varf:TFileStream;InStr,…
类别:加密 标签: 作者:admin 日期:2015-04-16 15.36.49

Delphi XE7使用本身的MD5单元进行字符串加密

介绍本文章介绍了DelphiXE7使用本身的MD5单元进行字符串加密,在delphiXE7安装目录下面有一个MessageDigest_5单元,我本地在下面的路径中E:\ProgramFiles(x86)\Embarcadero\Studio\15.0\source\soap\wsdlimporter\Me…
类别:加密 标签: 作者:admin 日期:2015-04-16 13.35.12

Delphi自有的MD5函数

MessageDigest_5.pas路徑source/Win32/soap/wsdlimporterusesTypes,MessageDigest_5;procedureTForm1.Button1Click(Sender:TObject);varMD5:IMD5;beginMD5:=GetMD5;MD5.Init;MD5.Update(TByteDynArray(RawByteString…
类别:加密 标签: 作者:admin 日期:2014-10-29 19.40.39

Delphi AES加密

(**************************************************************)(*AdvancedEncryptionStandard(AES)*)(*InterfaceUnitv1.3&...
类别:加密 标签: 作者:admin 日期:2014-08-05 16.42.31

delphi实现MD5算法

unitMD5;interfaceusesWindows,SysUtils;//自定函数计算字符串的MD5值functionStrToMD5(str:string):string;//计算字符串的MD5值functionFileToMD5(FilePath:string):string;//计算文件的MD5值typeMD5Count=array[0.…
类别:加密 标签: 作者:admin 日期:2014-08-05 15.52.02

Delphi XE2获取文件的 MD5、CRC、SHA-1、SHA-256、SHA-512

unituntCheckCode;interfacefunctionGetFile_MD5(constiFileName:String):String;//获取文件MD5functionGetFile_CRC(constiFileName:String):String;//获取文件CRC<b...
类别:加密 标签: 作者:admin 日期:2014-08-05 00.36.39

delphi 获取文件CRC和MD5

unituntCRCMD5;interface{获取文件CRC校验码}functionGetFileCRC(constiFileName:string):String;{获取字符串CRC校验码}functionGetStringCRC(constStr:string):Cardinal;{取文件MD5码}functionGetFileMD5(constiFil…
类别:加密 标签: 作者:admin 日期:2014-08-05 00.20.52

delphi xe SHA1

调用:
类别:加密 标签: 作者:admin 日期:2014-08-04 23.22.35

delphi StringToBase64、Base64ToString两个函数

{============================*函数名:Base64ToString**作者:**时间:2005.11.2915.25**说明:实现字符转换*============================}functionTGetEmailInfo.Base64ToString(constValue:string):string;varx…
类别:加密 标签: 作者:admin 日期:2014-08-02 00.42.42

Delphi生成GUID的两种方法

GloballyUniqueIdentifier(全球唯一标识符)也称作UUID(UniversallyUniqueIDentifier)GUID/UUID是通过特定算法产生的一个二进制长度为128位的数字,在空间上和时间上具有唯一性,保证同一时间不同地方产生的数字不同…
类别:加密 标签: 作者:admin 日期:2014-07-29 17.49.56

DELPHI 写的经常用到的加解密函数

以下程序可直接用,拷贝就可以了,希望可以起到抛砖引玉的作用。functionStrDecrypt(s:string;key:word):string;vari:byte;constfc1=2;fc2=3;begin//result[0]:=s[0];setlength(result,length(s));fori:=1tolength(s…
类别:加密 标签: 作者:admin 日期:2014-04-19 19.43.54

Delphi 自带的 Base64 编解码函数

今天帮别人解决一个关于Base64编解码的问题,竟然发现Delphi自带了Base64编解码的单元,叫EncdDecd,这名字很拗口而且不直观,估计这是一直很少人关注和知道的原因。这个单元提供两套四个公开函数:<brstyle="font-f…
类别:加密 标签:Base64 作者:admin 日期:2013-11-25 20.34.54

Delphi6-xe5 中的MD5实现方法

在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的,我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用IdHashMessageDigest,IdGlobal,IdHash单元,再写如下代码即…
类别:加密 标签: 作者:admin 日期:2013-11-25 20.34.18