Delphi基于多线程的网站后台地址扫描程序，一个多线程的后台管理扫描器，界面是防明小子的那个扫描工具写的，算是学习多线程的一个例子吧。输入网站地址后，程序会试着扫描该网站的后台管理地址，当然，这个是不准确的，看上去更像是搜索爬虫的样子。

Delphi发票打印程序附完整代码，2004年编写，已经发布过两套类似发票管理系统源代码，此为更新版。该发票打印管理系统其中包括： 　　1.租凭业发票 　　2.建筑业发票 　　3.固定资产发票 　　4.服务行业发票 　　5.无形资产发票 　　程序数据库配置采用了加密方案。配置文件Config.Ini，DataConfig后面的就是经过加密后的配置路径。加解密可到程序中去看看。

delphi开发的一个加密隐藏驱动器!!!delphi开发的一个加密隐藏驱动器!!!delphi开发的一个加密隐藏驱动器!!!

Delphi仿QQ截屏功能，可区域截图，鼠标拖选区域，作者:杨畅，我为人人，人人为我。希望大家一起交流，共同进步。定义区域截图时用到的变量，所选区域已截取并复制到了剪贴板！可在其它程序中粘贴！提示：请右键单击图标设置截图热键！不要设置成系统已注册的热键以免冲突。默认全屏截图：Ctrl S,区域截图：Ctrl Q。 　　//创建程序参数保存文件qscreen.ini在windows目录 　　qscreeninifile:= TInifile.Create('qscreen.ini'); 　　//读取参数文件qscreen.ini中dxCheckbox2的值，若不存在默认为True 　　dxCheckbox2.Checked := qscreeninifile.ReadBool('dxCheckbox2', '是否提示', True); 　　//读取参数文件qscreen.ini中HotKey1的值, 若不存在默认为16449即Ctrl A 　　HotKey1.HotKey:=qscreeninifile.Readinteger('HotKey1', '全屏截图热键', 16467); 　　//读取参数文件qscreen.ini中HotKey2的值, 若不存在默认为16465即Ctrl Q 　　HotKey2.HotKey:=qscreeninifile.Readinteger('HotKey2', '区域截图热键', 16465); 　　//注册两个默认的热键 　　HotKeyIndex1 := HotKeyManager1.AddHotKey(HotKey1.HotKey); 　　HotKeyIndex2 := HotKeyManager1.AddHotKey(HotKey2.HotKey); 　　//读取注册表中的自动启动项，以设置dxCheckbox1状态 　　Regtemp:=TRegistry.Create; 　　Regtemp.RootKey:=HKEY_LOCAL_MACHINE; 　　当程序设置窗体关闭时，更新参数保存文件qscreen.ini中关键字的值。

直接调用易飞模块_delphi_源码，可不用打开易飞直接调用里面模块，并有全部权限

Delphi下雪动画特效，一个十分漂亮的下雪场景动画，雪花飘落在屏幕的窗口上面，窗口听状态栏、标题栏都会落满雪花，看上去很气派。参数设置： 　　 Point: TPoint; // 雪点位置 　　 Color: Integer; // 先前颜色 　　 Speed: Integer; // 下落速率 　　 nMove: Integer; // 下落距离 　　 Stick: Integer; // '粘连'度 　　 SnowNodes: array[0..SnowNumber] of SnowNode; // 雪点数组 　　 hTimer: Integer; // '随机风向'时钟句柄 　　 CrWind: Integer; // 当前'风向' ( -1 ~ 1 ) 　　 CrStep: Integer; // 当前循环步数(用于限速) 　　 ScreenWidth, ScreenHeight: Integer; // 屏幕尺寸

免费发布 热血江湖伴侣DELPHI源代码 1.80 Build070829(屏幕智能识别)，其中用到一些第三方控件。 解压密码：tansoowww.tansoo.cn

具有文字聊天和传文件的功能，没有使用Indy网络控件，直接用的WinsockAPI。传文件用的也是UDP，还不会TCP穿透的说-_-!，用了简单的重传机制。请把Server放在公网上，Client放在内网来测试，否则就没有穿透的意义了。

Delphi注册机及生成注册码程序实例，根据机器标识生成注册码，在这里，作者提供了获得CPU序列号和网卡Mac地址的方法： 　　1.Delphi中可这个控件或这个动态库。控件提供了两个属性，MacAddress和CPUSerialNumber。 　　2.Delphi外的语言，请使用这个动态库。动态库提供了两个函数， GetCPUSerialNumber和GetMacAddress，这些函数和控件，在win2000和winXP中测试通过，在多CPU、多硬盘、使用了并列存储技术的大型服务器上，也测试通过。

CDDVDBurner刻录软件完整Delphi源码，可以刻录CD和DVD，ISO文件 [info] name=Magic CD DVD Burner ver=v1.23 author= devtool=Delphi/BCB/BDS sn= fullsource=1 desc=在Delphi和C++Builder程序中刻录CD/VCD的组件。