本人致力于网络信息包检测的软件开发,请访问“Http://netmoles.yeah.net”(200分)

  • 主题发起人 主题发起人 netmoles
  • 开始时间 开始时间
刚安装成功,正在试用,做的很不错
 
g622: Vpacket.Vxd源码我手里有的,需要我可以发给你。
netmoles:我试着调试了,netgroup驱动有些地方好像有bug,不过确实支持双平台。
我的目标还是基于DLL把它做成VCL,现在刚刚做到TCP这层。
请多切磋
 
支持!
加油!!
 
iie:请告诉我netgroup的url 谢谢
 
netgroup-serv.polito.it
 
刚看了看。
 
to 教父:
可以使用FnugryRASNotify控件,如果需要,可以email给你
 
to doxpix:实在是不好意思,我看了半天还是不知道怎么用这个函数,也没有找到帮助,
甚至到MSDN的网站上去找了都没找到,只好还要麻烦你指点一下了 :)
 
to doxpix:呵呵,你太谦虚了吧 :) 我也真是蠢,明明lpdwFlags声明是一个指针,我就是
没想到要用@,真是丢人,呵。
我把代码稍微改了一下,但还是不行 :(
procedure mycheck;
var
flag:Dword;
begin
InternetGetConnectedState( @flag, 0);
case flag of
INTERNET_CONNECTION_LAN:Showmessage('LAN');
INTERNET_CONNECTION_MODEM:Showmessage('Modem');
INTERNET_CONNECTION_PROXY:showmessage('Proxy');
INTERNET_CONNECTION_MODEM_BUSY:showmessage('Moden busy');
else Showmessage('Can not detect!');
end;
end;
运行中发现flag的值为86,所以检测不出来,另外为什么InternetGetConnectedState的
第二个参数为0 呢?我试了一下,如果设为其它值的话,函数都返回False,不知是怎么
回事?

to netmoles:那个控件是通过操作RAS来判断的吗?但是我的机子由于在局域网中,没有
装RAS,能有用吗?我的Mail:godfather_zhao@netease.com,谢谢。
 
to 教父:
FnugryRASNotify控件已email to you

如果有人兴趣,可到“http://www.torry.net/”寻找
 
to doxpix:确实如你所说,我在我们的笔记本上测试它显示是Moden,但是我怀疑它不是
实际检测当前的网络连接,而是测试本机的连接方式,就是说如果上网的话,它是通过什
么方式,因为我把我的机器的网线拔了,它还是说我是'lan',那台笔记本没有上网,它
也说是'moden'。

to netmoles:我已收到,非常感谢!不过它需要RAS,而我们的机器是通过局域网上网,
不装拔号网络,所以不能用它了。
还有,占用了你的地盘,不好意思 :)
 
to netmoles:加油!我佩服你也想助你一臂之力!
 
to netmoles:
加油!我佩服你!
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部