捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  粤ICP备10103342号 DELPHI盒子 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 盒子检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
盒子资源分类
全部展开 - 全部合拢
纯真IP数据读取工具
关键字:纯真 IP地址 QQWry 搜索
来 自:原创
平 台:Win9x,Win2k/XP/NT,Win2003 下载所需:0 火柴
深浅度:中级 完成时间:2005/8/22
发布者:coldwind8112 发布时间:2005/8/22
编辑器:DELPHI7 语  种:简体中文
分 类:数据库 下载浏览:2981/13181
加入到我的收藏
下载错误报错
登陆以后才能下载
 用户名:
 密 码:
自动登陆(30天有效)
图片如果打不开,说明流量不够了,请稍候下载……
    本程序的前身是《QQ IP数据库读取unit和示例代码》。

《QQ IP数据库读取unit和示例代码》的说明:
  在此unit中,实现了对于纯真网络(www.cz88.net)的IP数据库的读取,该数据库是在搜捕的基础上实现的,现广泛应用于QQ和各种论坛上,主要目的是获取IP地址和所在区域的对应关系。
  本unit中,对于所有的输入参数没有进行校验,请自行在输入参数前确定参数无误,此外,对于如何使用,在本unit中进行了详细的注解,也有例程进行了一定说明。
  对于IP的搜索,本程序仅仅通过二分法进行查找。

改进:
  在此版本中,最主要的改进是在读取速度上。对于读取IP地址信息的方法上进行了重写,并特地针对解压成文本文件设计了一个方法,该方法的速度还是比较另人满意的,一般情况下,可以在3秒钟内解压完成所有的IP数据。对于生成的文本文件可以和纯真网络解压后的文本文件比较一下,唯一差别在于纯真网络解压后的文本文件中某些行后有一个空格,不知道是什么原因造成的,在我的程序中没有这种情况。
  此外,由于在速度上有了提高,所以相应的完成了对于地区的模糊搜索以及IP地址段的搜索功能。该功能不同于纯真网络提供的地方主要在于在本程序中是在搜索完成后才将所有的搜索结果一次性显示出来,而不是边搜索边显示结果。
Google
 
本站原创作品,未经作者许可,严禁任何方式转载;转载作品,如果侵犯了您的权益,请联系我们
龙脉加密锁 15元起 Grid++Report 报表 申请支付@网
 相关文章
纯真IP数据读取工具
coldwind8112 2005/8/22 下+2981/浏+13182 评+17
QQ自定义IP数据库读取unit和示例代码
yuelinniao 2005/7/29 下+2826/浏+8839 评+5
QQ IP数据库读取unit和示例代码
dfw@98057 2005/3/19 下+1553/浏+9519 评+23
相关评论
共有评论17条 当前显示最后6条评论
sunking 2005/10/20 9:50:47
期待研究结果。
coldwind8112 2005/10/20 9:51:08
To EveryOne:
  请大家注意,该东东有个小问题,感谢sunking!
  该程序由于在unit1.pas中引用了qdialog部件,所以需要qtintf70.dll的动态链接库的支持,该链接库只有在安装了d7后才有,故程序不能在没有安装d7或者没有qtintf70.dll文件的情况下运行,请大家注意,下载后请将unt1.pas中uses段中的qidalog部件移除,不影响程序的,或者请大家下载一个qtintf70.dll至系统system32目录下,对此引起的不便深表歉意!
coldwind8112 2005/10/20 10:02:16
To EveryOne:
  上传一个qtintf70.dll供大家下载!
  请于以下地址下载 http://www.e-fun.com.cn/software/qtintf70.rar !
2cc070112 2009/3/30 14:07:38
收藏了
killwolf 2009/12/24 16:18:02
使用中发现有内存泄露,可能来自于:GetIPValue下的SplitStringToStringList函数,TstringList没有释放。
panxiaosen 2011/4/1 11:18:24
感谢作者的共享, 我改下了一下,造成内存泄露的GetIPValue函数的功能其实只用一行代码就可以实现,代码如下,注意的是要把ntohl的返回值强制转成dword,不然会溢出

function TLocate.GetIPValue(IP: string): DWORD;
begin
  Result := DWORD(ntohl(inet_addr(PChar(IP))));
end;
我要发表评论 查看全部评论
 
  DELPHI盒子版权所有 技术支持:深圳市麟瑞科技有限公司 1999-2024 V4.01 粤ICP备10103342号 更新RSS列表