博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2013年1月30日

摘要: View Code 1 unit XEMD5; 2 3 interface 4 5 uses 6 Winapi.Windows, System.SysUtils,{ Variants,} System.Classes; 7 8 type 9 MD5Count = array [0 .. 1] of DWORD; 10 MD5State = array [0 .. 3] of DWORD; 11 MD5Block = array [0 .. 15] of DWORD; 12 MD5CBits = array [0 .. 7] of Byte; 13 ... 阅读全文

posted @ 2013-01-30 09:47 对镜弹箜篌 阅读(196) 评论(0) 推荐(0)

摘要: View Code 1 unit Anti_Debug; 2 3 interface 4 5 uses 6 Windows, SysUtils, Classes, TlHelp32; 7 // -------------------查找-通用调试器(FD_)----------------------------------- 8 function FD_IsDebuggerPresent(): Boolean; // √ 9 function PD_PEB_BeingDebuggedFlag(): Boolean; // √ 10 function FD_PEB_... 阅读全文

posted @ 2013-01-30 09:45 对镜弹箜篌 阅读(481) 评论(0) 推荐(0)

摘要: View Code 1 unit Unit_Des_XE2; 2 3 { ********************************************************* } 4 { * DELPHI、PHP、C#通用DES编码解码单元 * } 5 { * 由TurboPower LockBox部分代码改写 * } 6 { * 滕州市东鸣软件工作室制作 ZWF 2011-12-27 * 7 * update by wh 2012-12-13 仅限英文及数字,中文不匹配 for delphi xe2 * } 8 { * EncryDes为编码函数,Dec... 阅读全文

posted @ 2013-01-30 09:39 对镜弹箜篌 阅读(545) 评论(0) 推荐(0)