对流氓软件和恶意插件,相信读者们也都一定听说过,也都一定碰到过。这些讨厌的东西会改掉我们的ie,时不时的弹出广告。更让我们痛苦的是,这些东西使用杀毒软件还检测不出来,我们只好使用360安全卫士,卡卡安全助手或者黄山ie修复专家等来查杀以及修护系统。那么这些讨厌的广告插件到底是如何实现的呢?那么接下来我就从编程的角度来看看它们的奥秘(我们使用delphi7来编写)!
第一步:运行delphi7
这一步我相信大家也都会吧!Delphi7是一个可视化的编辑器,运行后程序会自动给我们建立一个窗体,便于我们操作。我们的弹窗广告就是在forml窗体上编辑出来的!
第二步:使广告程序开机自动运行与隐藏
双击那个叫做forml的编辑窗体,在弹出的代码输入框中填入以下代码,实现程序自动写入注册表的功能,以达到开机自动运行的目的。
另外需要我们注意的是,在users中一定要添加registry,在var中要添加reg:tregistry:。这一点很重要的,不然的话,程序就没有办法运行了!很多黑客初学者在编程的时候都不注意这一点,导致整个程序不能运行,却又不知道错误在哪。所以我们做完这一步,我们的程序就可以写入注册表了。
第三步:检查浏览器是否运行
弹窗广告插件一般都是在浏览网页的时候来弹出广告,这样做的目的是为了嫁祸给你打开的网站,以为是浏览那个网站的广告,这样做的话可以更好的隐藏广告插件。
那接下来我就教大家写一段代码,来实现这个功能!在forml窗体上添加一个时间控件timer1。就是system里面的那个小时钟,很好找的。然后双击小时钟timer1时间控件,添加如下代码:
Hwnd:=findwindow(‘ieframe’.nil)://查找浏览器是否运行。然后在var中添加wnd:thandle;。
第四步:弹出令人讨厌的广告
继续在timer1中添加如下代码:
然后在uses中添加shellapi。
第五步:设置程序检测浏览器运行时间并弹出广告
单击timer1时间控件,在左边“object inspector”栏中的“interval”中设置时间。1000是1秒,60秒就是60000,我为了方便大家测试,设置的是60秒。通常弹窗广告插件为了隐蔽自己,设置的时间比较长,大致都是三十分钟或一个小时。如果是三十分钟自动弹出广告,那我们就设置为300000。
第六步:生成exe可执行程序
需要的代码我们都已经填写完毕了,接下来我们点击菜单栏project-option-directories/conditionals中的“output diretory”,来设置生成的exe可执行文件的保存位置,然后点下方的“ok”按钮!程序保存位置设置完毕后,点击菜单栏project中的“build project”就会立刻生成exe可执行程序了!
最后,我们来运行一下自己编写的弹窗广告插件,呵呵,效果我个人觉得还是不错的!如果大家还有什么疑问的话都可以提出来!