如何从注册表读取IP地址信息 (200分)

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #1

我的电脑里面,IP地址是放在HKEY_LOCAL_MACHINE/System/CurrentControlSet/Services/Class/NetTrans/0001,
上，我同事的电脑是放在HKEY_LOCAL_MACHINE/System/CurrentControlSet/Services/Class/NetTrans/0012上，
这种问题怎么解决啊？

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #2

而且ip地址是双IP的

 

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #3

var
reg:tregistry;
begin
reg.rootkey:=HKEY_LOCAL_MACHINE;
if(reg.openkey('/System/CurrentControlSet/Services/Class/NetTrans/0001'),false) then
memo1.lines.add(reg.readstring('键名'));
end;

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #4

可以通过winsock函数gethostname、gethostbyname得到本机的所有ip地址，可以合你的要求吗

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #5

http://www.delphibbs.com/delphibbs/dispq.asp?lid=555574
看看

 

G

gxcooo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-06

• #6

gethostname[]

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #7

To: hbezwwl
不行啊，只能得到一个IP,
我的双个IP是:134.141.35.3,192.168.10.3

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #8

var
hn:array[0..100] of char;
heHostEnt;
pInteger;
d:WSADATA;
begin
WSAStartup($101,d); //如果别的地方执行了，这里就不用了

gethostname(hn,100);
he:=gethostbyname(hn);
p:=PInteger(he^.h_addr_list);
if p<>nil then
while true do
begin
ShowMessage(inet_ntoa(PInAddr(p^)^)); //显示所有地址
p:=Pointer(integer(p)+4);
if(p^=0)then
break;
end;
end;

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-16

• #9

Toipi
PHostEnt是什么东东啊？
请教！

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-16

• #10

打开
开始菜单/程序/Borland Delphi 5/Help/MS SDK Help Files/Windows Sockets 2 Reference
查 hostent 就知道了

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #11

uses 加哪个文件单元？
uses api吗？

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #12

请问delphi那么多帮助，我怎么区分啊？如何选择帮助啊？

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #13

uses winsock

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #14

标题上写着了：windows socket
windows socket就是tcp/ip的网络应用的接口（当winsock然也包含其他协议的接口，不过一般用作tcp/ip）

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #15

uses winsock

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #16

太感谢啦。呵呵/
我实验成功！

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #17

实验成功，那就发分。
别发错了，是Pipi.

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #18

你怎么知道那么短的代码？
谁教你的啊？
很崇拜您！
再如何得到网关，与掩码!

 

S

scy_fjqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #19

thank you ,
能再回答上面的问题吗？