您还没有登录,请您登录后再发表评论 相关推荐
-
DELPHI 实现ping功能
实现PING功能 With ICMP.ReplyStatus do begin Msg:='Reply from'+' '+edthost.Text; Msg:=Msg+' '+'bytes='+IntToStr(BytesReceived); //返回字节数 Msg:=Msg+' '+'TTL='+IntToStr(TimeToLive); //返回生存时间 Tm:=MsRoundTripTime; //返回执行时间 if Tm<1 then Tm:=1; Msg:=Msg+' '+'time='+IntToStr(Tm)+'ms'; lstlnfo.Items.Add(Msg);//保存信息 if (BytesReceived=0) or (TimeToLive=0) then begin //无数据返回 b:=b+1; //记录掉包数量 lstlnfo.ItemIndex:=lstlnfo.Items.Count-1; end; //if lstlnfo.Count>100 then lstlnfo.Clear; if i mod 100=0 then stat1.SimpleText:='Lost:'+IntToStr(b)+ '/'+IntToStr(i)+'='+copy(FloatToStr(b/i*1000),1,4)+'‰'; //每Ping到100次显示一次掉包情况 end;
-
DELPHI实现PING功能升级版
通过以上的方式完美解决了Windows7系统在没有管理员权限的情况下，也能实现Ping功能问题，以上与大家共享。//需要引用WinSock单元。
-
Delphi 版的 Ping
uses IdIcmpClient; { Delphi 版的 Ping } function DPingIP(const strIP: string; const intLinkTimeOut: Integer): Boolean; var icmp: TIdIcmpClient; rpss: TReplyStatus; begin icmp := TIdIcmpClient.Cr...
-
Delphi系统集成开发环境（IDE）全面指南
本文还有配套的精品资源，点击获取 简介：Delphi系统是一个高效的集成开发环境，支持Object Pascal编程语言，适用于创建Windows桌面应用程序。它以快速编译器和强大的VCL框架而著称，使得开发者能快速构建功能丰富的应用程序。Delphi包括直观的用户界面设计工具，支持多种数据库系统连接，并且拥有良好的源码可移植性。学习Delphi需要掌握Object Pas...
-
Delphi中用ICMP探测远程主机是否存活
http://blog.csdn.net/jlbnet/article/details/316951 Delphi中用ICMP探测远程主机是否存活 2005-03-10 jlbnet 网络通讯中经常需要确定远程主机是否存活，以决定下一部进行的操作。可以直接使用ICMP协议来实现，但是要考虑许多协议细节，实现起来比较麻烦。Windows 自带的ICMP库里有现成的函数可以使用，只要在使用
-
delphi 检测网络是否连通_这是网工必知 小白需懂的计算机网络排错命令
不管是网络维护人员还是学习者，出现网络故障是件很头疼的事情，今天我们来了解一下两个简单的排错测试命令。一、ping命令Ping是Windows、Linux系统下的一个常用命令，利用“ping”命令可以检查网络是否连通，可以很好地帮助我们分析和判定网络故障。小编个人所在的网络为192.168.1.0网段，本地的IP地址为192.168.1.20，网关为192.168.1.1假设你的电脑此时上不了网，...
-
delphi 检测网络是否连通_网络基础Ping命令详解（使用Ping这命令来测试网络连通）
相关知识点 BIOS 在计算机领域，BIOS是 "Basic Input Output System"的缩略语，译为"基本输入输出系统"， 与前者读法相同。计算机在运行时，首先会进入BIOS，它在计算机系统中起着非常重要的作用。一块主板性能优越与否，很大程度上取决于主板上的BIOS管理功能是否先进。 ICMP ICMP协议是“Internet Control Message Protocol”（因...
-
delphi编程实现ping功能
基于delphi的一个自动实现ping功能的组件 可以在组件下实现ping功能并将返回的数据反馈到组件上
-
delphi 多网段TIdicmp ping 的错误
下面的代码在一个网段执行ping 函数问题，但在多网段，执行ping的时候，无论是否连通，返回的结果，返回的数据报里包含网管的IP地址，都是通的。：function ping( url: string):boolean; var aIdICMPClient: TIdICMPClient; begin aIdICMPClient:= TIdICMP
-
Delphi局域网IP端口多线程扫描工具(含全部源代码)
1.该工具用于在局域网内搜索可用的ip地址和端口 2.包含该工具的所有源代码，可用于学习或二次开发 3.已在XP和win7测试通过
-
批量网络Ping工具
实现定时自动批量ping 一些设备并显示ping的结果，可用于自动监测设备的在线情况，可以登记设备，删除设备，修改设备，为了实现简单，删除设备就只用将相应的行清空即可。
-
delphi 通过Ping命令检测网络是否正常
可以通过Ping远程服务器的Ip，或Url来检测网络是否正常，起到快速检测网络效果。
-
用Delphi即时判断当前的网络的连接方式
判断网络的是否连接或者连接方式，比较重要的一点就是是不是即时判断，如果你明明无连接，判断出来却说你有，连接上了，却说你还未连接，下面要介绍的两个方法中 InternetGetConnectedState就是不怎么够即时的API函数，而第二个使用的是IsNetworkAlive这个API函数，这个没有InternetGetConnectedState的那种问题，但是可能需要安装SDK，也就是.N
-
delphi TEdit设为下横线，类似填表格
delphi TEdit设为下横线，类似填表格效果，无需第三方控件就可以实现。 无须编写代码，只要设置一下控件属性 需要修改这些属性： BorderStyle改为bsNone BevelKind改为bkSoft BevelEdges下的项目中只将beBottom设为True，其余设为False 为了美观，最好再将Ctl3D设置为False。...
-
IPv6地址的ping、telnet等操作
最近在研究https协议是如何传输数据的，用wireshark抓包分析，发现客户机和google网站在传输数据时使用了IPv6地址，于是相对ipv6地址测试下基本的功能。 ping功能，直接使用ping ipv6,如 telnet功能，也跟ipv4一样，telnet ipv6 而访问具体应用，如访问web服务器，则有一点区别，需要使用http://[ipv6](多了个方括号) ...
27 楼 zcqshine 2009-11-04 14:54
26 楼 xfuajiao 2009-10-13 09:24
25 楼 whaosoft 2009-01-30 18:56
24 楼 weidewei 2008-09-11 18:17
23 楼 xiejin2008 2008-09-04 20:22
22 楼 shuishou 2008-09-04 15:25
21 楼 d2lorder 2008-09-03 12:46
上文不是奴性而是告诉我们应该怎么样把精力花在有用的地方
20 楼 zhangzhaobo1103 2008-09-03 12:27
19 楼 qmug 2008-09-03 05:58
18 楼 ShiningRay 2008-08-05 21:03
17 楼 javatar 2008-08-05 20:24
1、上司绝对不会错。
2、如果发现上司的错，一定是我看错。
3、如果我没有看错，一定是因为我的错，才害得上司犯错。
4、如果是上司自己的错，只要他不认错，那就是我的错。
5、如果上司不认错，我还坚持他有错，那我就是错上加错。
6、总之上司绝对不会错，这句话永远不会错。
16 楼 windlooker 2008-08-05 16:22
15 楼 hyhongyong 2008-08-05 14:23
心态最重要！
第10条还可以理解为：36计之走为上？
14 楼 jiudian30 2008-08-05 13:39
13 楼 mayu 2008-08-05 11:52
要想在事业上有所成就就不能够只是等待时机，您必须主动的寻找机会。
===
寻找机会？出击？，和文章文不对题了
12 楼 hszhl 2008-08-05 10:37
11 楼 kofboy 2008-08-05 09:54
10 楼 lhyasia 2008-08-05 09:22
9 楼 geminiyellow 2008-08-05 08:16
8 楼 liuming 2008-08-05 01:28