2015 年 7月 28 日随笔档案 - lypzxy

2015年7月28日

摘要： system.ZLib http://docwiki.embarcadero.com/CodeExamples/Berlin/en/ZLibCompressDecompress_(Delphi) 还不如万老师的例子正确，官方的例子是 http://www.cnblogs.com/del/archiv 阅读全文

posted @ 2015-07-28 22:49 lypzxy 阅读(1528) 评论(0) 推荐(0) 编辑

delphi 判断调试状态

摘要： DebugHook该变量在调试状态下值为1,运行模式为0,例如,我们可以使用如下的代码来简单控制:if DebugHook=0 then 阅读全文

posted @ 2015-07-28 22:28 lypzxy 阅读(1241) 评论(0) 推荐(0) 编辑

delphi AES encrypt code

摘要： delphi AES encrypt code(**************************************************************)(* Advanced Encryption Standard (AES) *... 阅读全文

posted @ 2015-07-28 21:25 lypzxy 阅读(578) 评论(0) 推荐(0) 编辑

DCPcrypt

摘要： delphi dcp componentTDCP_md5md5 String;md5 stream;流文件procedure TForm1.Button1Click(Sender: TObject);var hashd: array [0 .. 31] of Byte; abytes: TByt... 阅读全文

posted @ 2015-07-28 10:09 lypzxy 阅读(669) 评论(0) 推荐(0) 编辑