![](https://img-blog.csdnimg.cn/20201014180756930.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
加密解密专栏
欧巴Godwin
无,懒得写
展开
-
Delphi关于改进AES算法的加解密文件功能
以下代码出自http://blog.csdn.net/hellogv/,引用请注明出处!代码有点乱,想要具体实现方法的朋友,可以给我留言附:以下代码在杨泽晖 (Jorlen Young)所开发的AES算法接口上改进!function StrToHex(Value: string): string;var I: Integer;begin Re原创 2007-07-22 14:40:00 · 8813 阅读 · 4 评论 -
最简单地锁定文件夹!!!
本文章来自http://blog.csdn.net/hellogv//////////////////////////////////以下是锁定文件夹的方法 procedure TSysClass.QuickLock(DirList:TStrings); //DirList是保存文件夹的列表var UnLockDIRList:TStrings;原创 2007-11-01 19:49:00 · 10413 阅读 · 0 评论