捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  沪ICP备05001939号 DELPHI盒子 | 盒子论坛 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 论坛检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
 
广告
评论:实时监控网卡的工作状态 (更新)
akg130 42970 2012/11/6 23:15:33
上次弄丢了,在次感謝!
akg130 42517 2012/6/10 12:21:27
very very thank you!

太謝謝了!
huangxw 26269 2006/9/25 16:26:07
厉害啊,请教一个问题
Win2000/WinXP下正常,但在 Win98 下无论是否插网络线都显示 “不可达”,为什么?
vvyang 23628 2006/5/16 8:20:50
To xxxxzxx:
  E_mail:zh5430@yahoo.com.cn
  也可以上大富翁论坛,我的网名还是 vvyang。
vvyang 23622 2006/5/15 22:16:15
To speedbin:
  谢谢老兄的认真纠错。不过 FPAdapters 这个指针不用移动,FPAdapters^.table[0]、FPAdapters^.table[1]、FPAdapters^.table[2]...本身就是让地址向后移。一般来说应该已经申请了足够的内存,不会出现越界错误的。如果我的代码在您的机器上出错,您可以把 for 循环改成 while 循环,您写的代码完全正确。
  另:我的机器是 IBM X31,有一个太网卡、一个无线网卡和一个虚拟网卡,XP 操作系统,一直没出现问题。
xxxxzxx 23608 2006/5/15 14:32:51
vvyang老大求个联系方式有几个问题请教,谢谢.
speedbin 23606 2006/5/15 13:39:17
To vvyang:
我看过MSN的定义,定义是对的,但是程序在我的IBM T43上运行,会错误,是一个异常好象访问超出范围。
lvAdapters.Items[i].Caption := FPAdapters^.table[i].bDescr;
...
这一句i可能会是4(我这里是这样的),但是访问FPAdapters^.table[i].bDescr;就越界了。
我于是改成:
...
lvAdapters.Items[i].SubItems.Add(IntToStr(FPAdapters^.table[0].dwInUcastPkts));
Cardinal(FPAdapters) := Cardinal(FPAdapters) + SizeOf(MIB_IFROW);
...
注意这一句:Cardinal(FPAdapters) := Cardinal(FPAdapters) + SizeOf(MIB_IFROW);
这句是指针向后移动。
我这样运行结果就出来了,没有异常。
不知我说的对不对
vvyang 23405 2006/5/7 21:16:58
徒劳了:
GetIfTable(nil, @dwSize, False);
GetMem(pMibIfTable, dwSize);
记录类型无非两种作用,一种是通过定义分配内存,另一种就是便于访问内存,这个 MIB_IFTABLE 记录类型仅起第二种作用。
vvyang 23403 2006/5/7 20:39:07
To speedbin:
呵呵,谢谢您的建议。不过 table 的定义没有问题,您可以看看 MSDN,数组的上限可以是任何整数。虽然 MIB_IFTABLE 记录的大小固定,但是他占用的内存是可变的,因系统和硬件配置不同而异,不然下面这两句话就是
speedbin 23377 2006/5/5 16:00:08
程序有问题:
...
lvAdapters.Items[i].Caption := FPAdapters^.table[i].bDescr;
...
table结构成员是被定义成[0..0],用循环是错误的。
我改成这样就运行正常了。
...
lvAdapters.Items[i].SubItems.Add(IntToStr(FPAdapters^.table[0].dwInUcastPkts));
Cardinal(FPAdapters) := Cardinal(FPAdapters) + SizeOf(MIB_IFROW);
...

不知我说的对不对。
alren 23310 2006/4/29 14:55:46
明白了,谢谢!!
vvyang 23189 2006/4/25 8:54:33
To alren:
区分回路是没问题的。但是不能区分 SoftEther 这类带驱动的虚拟网卡,因为我的程序是读取驱动信息,其实 SoftEther 连系统都认为是真正的网卡。
alren 23184 2006/4/24 22:53:03
哦!谢谢!知道了。还有有一个问题想问下,如果有虚拟网卡时,怎样才知道哪个才是本机的实际网卡?
vvyang 23182 2006/4/24 22:13:54
To alren:
Delphi 7 自带的资源文件,在 XP 下能获得主题效果,没用。
alren 23179 2006/4/24 16:31:18
to:vvyang
我已注释掉,我想知道,这个文件是有什么用?
vvyang 23171 2006/4/24 11:13:44
To alren:
把 {$R WindowsXP.res} 注释掉就行了。
alren 23168 2006/4/24 9:37:12
谢谢,一直在找这个。但是是我按F7运行是,怎么不能运行,提示说‘[Error] File not found: 'WindowsXP.res'’,这个文件怎么没有?
bianfuxia888888 23139 2006/4/22 13:18:23
不错,不错
第一页 上一页 下一页 最后页 有 18 条纪录 共1页 1 - 18
 用户名:
 密 码:
自动登陆(30天有效)
 
  DELPHI盒子版权所有 1999-2023 V4.01 粤ICP备10103342号-1 更新RSS列表