~~~获得ip和计算机名~~~-CSDN论坛

⋅ftp上传问题 ⋅图文混排[高人解答另加分] ⋅dreamweaver工具打开的代码出现乱码如何解决？ 更多帖子 关注私信空间博客 mars_han 本版专家分：1591 结帖率 100%: 我要用hub连接多台终端，如何获得终端的ip和计算机名，一位不同机器分配不同权限？请给出这两个函数的具体小例。多谢！！！

0 2004-05-05 12:53:58

回复数 10 只看楼主引用举报楼主

bottom 本版专家分：1217: 偶也要，毕业设计中一个小模块就要这个！！

0 2004-05-05 14:47:01

只看TA 引用举报 #1 得分 0

⋅COMBO BOX的消息机制 更多帖子 关注私信空间博客 abrahambb 本版专家分：10: gethostbynam，得到名称后有关的信息，比如IP 也就可以得到啦
StrPas(inet_ntoa(PInAddr(phoste^.h_addr_list^)^));

0 2004-05-05 17:09:34

只看TA 引用举报 #2 得分 0

visual_cjiajia 本版专家分：1288: 倒人家楼主要的客户端的不是本地的吧

0 2004-05-05 20:34:06

只看TA 引用举报 #3 得分 0

apache57 本版专家分：970: iphlper api可以帮助你完成任务。

0 2004-05-05 20:38:38

只看TA 引用举报 #4 得分 0

⋅可儿生日快乐 ⋅祝福可儿成功订婚! ⋅恭喜月亮MM升级，据说是个带把的。 更多帖子 关注私信空间博客 hsmserver 本版专家分：26132 红花 2008年4月 Delphi大版内专家分月排行榜第一 蓝花 2007年12月 Delphi大版内专家分月排行榜第三 2007年9月 Delphi大版内专家分月排行榜第三 2007年8月 Delphi大版内专家分月排行榜第三: getcomputename
gethostbyname

0 2004-05-05 20:45:22

只看TA 引用举报 #5 得分 0

⋅求一个查询语句！ ⋅请问怎么根据开发板做出一个成品机器？ ⋅程序改为dll后速度变慢了：） 更多帖子 关注私信空间博客 extcsdn 本版专家分：9494: uses {...,}Winsock;

procedure ShowHostName;
var
  wVersionRequested : WORD;
  wsaData : TWSAData;
  p : PHostEnt;
  s : array[0..128] of char;
  p2 : pchar;
begin
{启动 WinSock}
  wVersionRequested := MAKEWORD(1, 1);
  WSAStartup(wVersionRequested, wsaData);

{计算机名}
  GetHostName(@s, 128);
  p := GetHostByName(@s);
  ShowMessage(Format('Computer name is ''%s''.', [p^.h_Name]));

{IP地址}
  p2 := iNet_ntoa(PInAddr(p^.h_addr_list^)^);
  ShowMessage(Format('IP address is %s.',[p2]));

WSACleanup;
end;

0 2004-05-08 10:15:59

只看TA 引用举报 #8    得分 20

⋅MOVSQ编码问题 ⋅DFMirage Mirror Driver获取变化区域失败 ⋅长时间调用屏幕截取出错 Out of resources 更多帖子 关注私信空间博客 ahjoe 本版专家分：12809: 客户端有程序吧？客户端程序可以调用getcomputename,gethostbyname，再把信息传给服务端可以吧！

0 2004-05-08 15:57:33

只看TA 引用举报 #9 得分 0

bottom 本版专家分：1217: 倒偶想知道在服务器端直接获得客户端怎么办呢？

0 2004-05-08 21:00:50

只看TA 引用举报 #10 得分 0