动态获得鼠标坐标的delphi代码

为了提高大家的安全意识,前段时间小王设计了一个蜜罐系统(详见《蜜罐系统正式开启》),为了让这个系统全自动,看起来很牛B,我用delphi写了两个小程序,一个是鼠标自动获得屏幕坐标的,一个是鼠标自动点击的,下图右侧是鼠标自动获得屏幕坐标的软件界面,今天把鼠标自动获得屏幕坐标的代码发出来。
...

标签:

一个delphi开发的恶意程序代码

这个delphi程序是去年上半年为了测试病毒和病毒代码库所做的恶意程序,功能有:程序运行后,会将自己添加到系统启动项中,如果有u盘接入,会自动copy自己到优盘上,还可以在指定时间内,在系统后台进行某些操作,比如打开网页什么的,该程序已经在去年被列为病毒了。本文只做技术交流,请勿用于非法用途,出现任何问题,本人概不负责。下面是代码,dephi7开发,用了一个timer控件:
unit Unit1;

interface

uses
    Windows, Messages, SysUtils, Variants, Classes, Controls, Forms,
...

标签:

用delphi发邮件

控件
    IdSMTP1: TIdSMTP;
    IdMessage1: TIdMessage;
代码
    IdSMTP1.Host:='smtp.163.com';
    IdSMTP1.Port:=25;
    IdSMTP1.Username:='发信人名称;
...

标签:

分页:«1»