说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用修改文件时间的方法来加密文件-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
用修改文件时间的方法来加密文件-Delphi资料

[摘要]:本文介绍了在Delphi中利用系统函数和Windows API函数配合Delphi中的DataTimePicker组件来获取和修改文件的时间信息的方法,以达到软件信息的简单加密。

谈到文件加密已经有很多方法了,但传统的文件型加密方法都存在一些不足。例如:让人头痛的密码技术、复杂的全文加/解密算法、会产生垃圾文件的暗贴技术等等。这里我向大家介绍一种新的文件加密思路。在Win 95/98中选定一个文件后单激鼠标右键可以查看文件的属性。其中会列出该文件的创建时间、修改时间和访问时间。这些信息的设置一般都是由操作系统(也就是由Dos/Windows等等)自动完成的,不会让用户轻易修改。利用这一特性就可以实现很隐蔽的加密技术。

加密原理:用特定的时间信息替换原来的文件时间信息。

解密原理:获取已加密文件的时间信息与特定时间信息比较,如相同则说明该文件是合法的,如不同则说明该文件属于过期或盗版软件。

以上简单介绍了文件时间属性的修改方法,利用这种方法可以起到简单的软件加密。例如:假设某个软件或游戏执行完后存储了一些存档文件,则操作系统会自动设置该文件的修改时间,那么稍有经验的用户就可以用Windows中的“查找文件”功能找到最后被修改的文件。如果该文件是记录密码或用户信息的文件(实际上很多情况都是这样),后果简直不堪设想。另外,如果适当设置文件的创建、修改时间和访问时间,例如:保持三者之间为一定的时间间隔就可以作为加密的一种好手段。运行主软件时只要动态的检测一下文件时间是否满足特定的要求就知道该软件是否过期或属于盗版软件,从而达到加密和保护软件的目的,并且不会产生垃圾文件。

以下介绍具体实现方法:

利用Delphi中的FindFirst函数可以得到一个文件的属性记录,该记录中的FindData域中就记载了详细的文件时间信息。FindData中的时间信息不能直接得到利用本文源程序中的CovFileDate函数可以完成文件时间格式的转换。设置文件的时间要复杂一些,利用Delphi中的DataTimePicker组件来辅助完成这一复杂的操作。可以利用四个DataTimePicker组件来完成文件创建时间和修改时间的设置。注意:文件的访问时间用修改时间来代替。使用下面的例子时,请在您的Form上添加四个DataTimePicker组件。其中第一和第三个DataTimePicker组件中的Kind设置为dtkDate,第二个和第四个DataTimePicker组件中的Kind设置为dtkTime,DateMode设置为dmUpDown。

备注:修改文件时间的范围是从公元1792年9月19日开始的,上限可以达到公元2999年或更高。另外,请不要将此技术用于破坏他人文件等非正当途径。

越狱与开源:2015移动安全峰会(MSS)纪实 开发者自白:我是如何不花一分钱收获230万应用下载量的! OpenCloud 2015报名超预期 近20位讲师会前采访提前看 硅谷公司人才招聘那些事儿——硅谷“超级面试官”董飞专访 一切为了用户体验:揭秘京东首页改版背后的故事 TIOBE 2015年4月编程语言排行榜:Java王者归来 三大主题技术峰会开幕在即 OpenCloud 2015参会者提醒 《近匠》快码,唯快不破的代码众包平台 打破边界 生态化反!乐视发布三款超级手机 苹果收购LinX:iPhone或将采用双摄像头技术 Google《Android性能优化》学习笔记 Amaze UI 2.3.0版本发布 整合多个第三方插件 专访Layabox创始人谢成鸿:Flash与HTML5结合的背后 高德推“LBS+”开放平台战略 整合位置大数据和云计算 CLion 1.0发布,C/C++跨平台集成开发环境 2015超实用的前端开发指南 期待吗?Linux 4.1将引入大量汇编代码变更! TSMC量产16FF+制程,Apple Watch或将采用Finfet技术 谷歌搜索引擎更新 移动端支持不好的网站排名将受影响 《近匠》格知GUECHI,设计师品牌让你离时尚更近 Apple Watch应用开发经验谈:我遇到的那些坑 约吗?UNITE 2015 BEIJING日程全揭晓! 谷歌扩擴增App搜索結果 已抓取300亿App页面 功耗、联网与交互:可穿戴设备操作系统问题解读 李大学离职京东后:转做投资人,助传统产业“互联网+”转型 Skype Translator实现中英实时语音对话 语音翻译领域又一新突破 如何判断自己是否适合自由职业? 创造·连接·成就:UNITE 2015 BEIJING圆满落幕 IT互联网人才招聘市场特点:人少钱多疯狂抢? React Native并非原生 Instagram Apple Watch应用设计师:对原有App全部重新思考 netstat功能如何实现的? RemoveFontResource在WinMe下能够正确卸载字体,但在Win98第一、第二版下却出错?谁能解决,多多得分,可以另外开贴给分!!! WINNT 4.0问题 ????"帮助"文件怎么做?? 在ASP中确定当前用户帐户用何办法? 我以前问过的问题,但是没有解决?现在100分买?谁能解决???? fastreport的中文帮助,或者例子? edit的问题,up有分 用adoquery建立的查询在执行时出错! 还有一个问题 业务纪录的自动编号!!! 请问各位大侠."查找",这个函数怎么写. Proc++ :where LPAD(FieldName,6,'0') = :myFieldValue 为啥错? 用OPENGL编制基于对话框的程序要求把所绘的三维图形显示在对话框的一个区域??? 谁知道用socket通信,一秒鈡最多可以传多少条? 我要是想把已有SQL数据库变成*.SQL文件到别的机器上直接建库怎么做? 我用标准输入输出流来输入字符串到string的对象里,为什么得不到空格和以后的字符? 转一篇文章——有关LSD的罐头 (有点长,没耐心的就不用看了^o^) 送分! 超过10个回复请勿再进!!! VC程序调试问题 懂电路分析者请进 求树型菜单的代码??马上给分!!! VC可以调试可执行文件吗??? 请高手指点迷津 :) 求树型菜单的代码?? 如何使列表控件的第一列居中(包括标题文本和内容文本)??? 用查表法按ALPHA混合R、G、B也会这么慢?奇怪!(有源码)(50 怎样用vc开发一个动态链接库让PB调用,要求参数为字符串 3dmax 的问题 关于用alert("信息!")弹出的对话框 up up up up up up up up up up up up up 请问“IE登录时”为什么Domino检测不到我的Username and password? 着急,这条sql语句怎么写?????? 爱的密码 散分啰!!统计BCB论坛现有成员... 这样的COM组件如何实现? 请教:我想学lotus,可不知哪有lotus和lotus教程下载,望指教! 多选项提交过来的值是什么类型的? ORA-03113: end-of-file on communication channel谁知道??高手救命! 星际争霸几大战略(大家切磋切磋) CHtmlView的刷新问题 关于asp.net加密的讨论 怎么样把两个ArrayList合并成一个??我在文档里找了半天也没找到!急~~!!!!!!!! 》》》菜鸟发问:SQL SERVER2000 可以对 office 文档进行全文检索吗? How to alter DBGrid Scrollheader Color? c怎样访问数据库啊?一定给分! from里的参数传递为ENCTYPE="multipart/form-data"时的问题? 网吧问题 如何在txt文件中查找字符 请问如何实现当进入一个combox时自动下拉列表框(不用用鼠标去点) 关于volatile 修饰词 过去用Delphi开发数据库都是用Access,现在急需使用SQL Server。请问:我必须掌握SQL Server中的那些内容。 一个三角形的面积是36平方分米,如果把他的高扩大到原来的一百倍,它的底缩小到原来的十分之一,则面积是 一个三角形面积是十八平方米它等底等高的平行四边形的面积是多少 要想使塑料化工桶增加强度怎么生产我生产的是50公斤白塑料桶 一个三角形的高和底分别为A米和H米,如果底增加6米高不变,他就成为一个新的三角形这个新三角形的面积比原来增加了几平方米? 一个三角形的面积是108平方分米,如果它的底缩小3倍,高不变面积是多少 夏天给自行车的轮胎打气时,为什么不能打得太足?从分子角度讲要从分子角度说明! 马路上行驶的油罐车后挂着一条拖在地上的铁链子,为什么 一个三角形的面积是27平方分米,如果底缩小3倍,高不变,面积是多少平方分米:如果底扩大2倍,高缩小2倍,面积是多少平方分米? 用分子的知识回答:自行车轮胎打气后涨大变硬 一个三角形面积是六分之一平方分米,高是三分之二分米,底是多少分米? 三角形的面积是21平方分米,如果第缩小三倍,高不变面积是多少平方分米?如果底扩大2倍,高缩小2倍面积是几 轮胎充气有什么用呢?自行车的轮胎如果不充气会怎么样,为什么要充气? 一个三角形的面积是六分之五平方米,高是九米,底是多少? 一个三角形的面积是108平方分米,如果它的底缩小3倍,高不变面积是多少?如果它的高缩小3倍,底扩大4倍求面积 水果市场运来苹果6000千克卖出百分之20卖出多少千克还剩多少千克 水果店上午卖出12箱苹果,下午卖出16箱同样的苹果,上午比下午少卖了200元.平均每箱苹果多少元? 壳牌的汽油质量怎么样请听说壳牌的汽油清洁度好,相同情况下不容易产生积碳,单身由于添加剂多同样体积的油跑公里数要少.是否是这样呢?他们的油是否可以使用呢? 一个三角形的面积比与它等底等高的平行四边形的面积少43平方米,求这个平行四边形的面积是(). 化学方法回答:为什么在加油站要严禁烟火? 壳牌汽油到底怎么样? 油罐车放油如何少给 星星水果库要调来一批苹果,第一次运来4车,平均每车806千克,但还差976千克.这批苹果共有多少千克?如果换成载重比原来大的卡车来运,而且要用3辆车一次运完,则这样的卡车平均每辆运多少千 壳牌汽油怎么样 装油的油罐车的尾部总装有一根脱在地上的铁链,这是为啥?HELPTHANKS 水果店运来5车苹果.运来梨的箱数是苹果箱数的3倍,运来梨多少箱. 一个三角形的面积是8平方分米,若底和高都扩大到原来的5倍,它的面积是多少平方分 一个三角形的面积是80平方分米,它的底是16米,高是多少米?(用方程解答) 果农把收获的苹果打算装箱运输,每箱的千克数相同,第一车装晕了10箱,果农把收获的苹果打算装箱运输,每箱的千克数相同,第一车装运了10箱,第二车装运了6箱又20千克,正好装完,第二车苹果数 一块三角形草地,底边长是150米,底边和高的比是6:5,这块三角形草地的面积是多少平方米? 王大伯开了一间水果店他到苹果产地进货每千克1.2元一次他到产地买了5000千克苹果光运费就200元他还想得到百分之二十的利润每千克定价多少元 严禁烟火标志是告诫人们什么?A .已离开危险地区 B.正进入危险地区 C.正进入安全地区 一块三角形地,底边长150米,底边和高的比是6:5,这个三角形面积多少平方米? 王大伯开了一个水果店,他到苹果的产地进货,每千克1.20元.一次他到产地买了5000千克的苹果,光运费就用了200元,他还想得到20%的利润,每千克应定价多少元? 为什么面粉加工厂都要挂出“严禁烟火”的标志 (化学原因)有什么化学因素? 已知三角形三边长分别为4,5,6,求这个三角形的面积我现在初二,别这弦那弦的 一油罐车有多少吨 严禁烟火的 标志通常出现在哪些地方 一个三角形的底边长6米,如果底边延长2米,那么面积就增加3米.原来三角形的面积是多少平方米? 5吨油罐车哪个好 等底三角形边长之和是24分米,它的面积是28平方分米,这个三角形的高是多少? 一个三角形的面积是360平方分米,底是30分米,高是多少分米? 梦到油罐车爆炸梦见亲眼看见油罐车泄漏,起火,然后拨打了110,然后听到爆炸,死了好多人 一个三角形的面积是24分之5平方分米,它的底边长是4分之1,底边长的高是多少分米? 油库、面粉厂、锯木厂、纺织厂、矿井、煤气站等地为什么要严禁烟火如题 北京房山油罐车爆炸了,油罐车为什么会爆炸?3Q北京房山油罐车爆炸了.请问,有什么危险因素会导致这种油罐车爆炸吗? 一个三角形的面积是0.24平方分米,高士8厘米,底边长多少厘米 油库附近严禁烟火是由于( )A.分子之间有间隙B.汽油分子在不断地运动C.同种分子的性质相同C.汽油分子非常小 油罐车爆炸影响会污染吗 一个平行四边形的面积是28平方分米,与它等底等高的三角形的面积是,一分钟之后给我呼呼 为什么面粉厂和加油站一样,也高挂“严禁烟火”的警示牌?用化学知识回答 一个三角形的面积是12平方厘米,它的高是5分之12厘米,这个三角形的底是多少?求你们了,十分钟啊 果品公司购进5万千克苹果,每千克进价是0.98元,付运费等开支1840元,损耗为1%,如果希望全部进货销售后能获利20%,那么每千克苹果零售价应当定为多少元? 一个农民运来一批西瓜,进价为每千克2元,卖出每千克3元,每天能卖出200千克,每千克降价0.1元,每天可多出售40千克.另外,每天的房租等固定成本共24元.该农民每天赚200元,尖将每千克西瓜的售价 油罐车的立方怎么算如题 谢谢了请问下,现在油罐车都是椭圆形的,那它的立方怎么算呀! 果品公司购进苹果5.2万千克,每千克进价6.5元,付运费等开支6240元,预计损耗为1%,如果希望全部卖出后能获利20%,那么每千克苹果零售价应为多少元 油库重地 严禁烟火用阿拉伯语怎么说 家用的塑料盆桶碗,是什么原料制作而成的? 果品公司购进5.2万千克苹果,每千克进价0.98元,付运费等开支1840元,损耗1%,如销售后获利17%,那么每千克苹多少钱?一元一次方程 一个三角形的面积是十八平方米与它等底等高的平行四边形的面积是多少平方米 一般化工塑胶桶的材质除了PE的,还有哪些材质的啊?有PP、PET或PVC得吗?有的话在哪里可以买到的啊?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn