摘要: 1、检测主程序大小,防止破解补丁之类:Function TForm1.GesSelfSf: integer;var F: file of byte;begin Filemode:=0; AssignFile(F, '.\FileName.exe'); Reset(f); Result := Filesize(F); CloseFile(F);end;2、检测创建日期和时间,让破解补丁实效:Func...阅读全文
posted @ 2006-08-11 13:18 hingman 阅读(451) 评论(0) 编辑