网络封包截取源码DELPHI

这个封包截取程序是网络上别人写了的源码，我整理了下做成范例了，大家可以改来实现更多的技术，保存的封包信息，保存在C盘的123.TXT文本文件里面

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       3298  2012-05-17 10:34  封包钩子\APIHook.dcu

     文件       3865  2012-05-17 10:34  封包钩子\APIHook.pas

     文件       3719  2012-05-17 10:07  封包钩子\APIHook.~pas

     文件        434  2012-05-17 09:56  封包钩子\HOOK.cfg

     文件     372224  2012-05-17 10:35  封包钩子\HOOK.dll

     文件       2014  2012-05-17 09:56  封包钩子\HOOK.dof

     文件       3323  2012-05-17 09:56  封包钩子\HOOK.dpr

     文件        876  2012-05-17 08:57  封包钩子\HOOK.res

     文件       3288  2012-05-17 09:07  封包钩子\HOOK.~dpr

     文件        434  2012-05-17 09:04  封包钩子\Project1.cfg

     文件       2014  2012-05-17 09:04  封包钩子\Project1.dof

     文件        188  2012-05-17 09:04  封包钩子\Project1.dpr

     文件     401920  2012-05-17 09:20  封包钩子\Project1.exe

     文件        876  2012-05-17 08:59  封包钩子\Project1.res

     文件       4606  2012-05-17 09:20  封包钩子\Unit1.dcu

     文件         51  2012-05-17 09:20  封包钩子\Unit1.ddp

     文件        768  2012-05-17 09:17  封包钩子\Unit1.dfm

     文件       1292  2012-05-17 09:20  封包钩子\Unit1.pas

     文件         51  2012-05-17 09:18  封包钩子\Unit1.~ddp

     文件        768  2012-05-17 09:17  封包钩子\Unit1.~dfm

     文件       1294  2012-05-17 09:18  封包钩子\Unit1.~pas

     文件       1816  2012-05-17 10:15  封包钩子\WorkFiles.dcu

     文件       1100  2012-05-17 10:13  封包钩子\WorkFiles.pas

     文件       1115  2012-05-17 10:07  封包钩子\WorkFiles.~pas

     目录          0  2012-05-17 10:34  封包钩子

----------- ---------  ---------- -----  ----

               811334                    25