程序说明.txt

来自「某计算机系本科学生做的加密设计及实现」· 文本 代码 · 共 22 行

在DELPHI中安装并注册TRegwareII 类


在 HKEY_LOCAL_MACHINE\Software\CLASSES\CLSID\' + FProgGUID + '\InprocServer32'
的ThreadingModel子键数据中添加
  FLicense := License;//注册者
  FOrganization := Organization;//组织
  FRegCode := RegCode;//注册码
  FExpireTime := ExpireTime;//注册时间
  FRegVersion := RegVersion;//注册版本号
  FLastCountDown := LastCountDown;//使用天数

注册码的计算：

DSN=硬盘物理序列号
uesrname=注册者名称
reg=(DSN)前1/2+uesrname+(DSN)后1/2
 
然后计算reg所有字符的和
sum=sum+ (FSeed - 1113 mod Ord(reg[i]);)