📄 lc_bcb_108.html

📁 C++Builder教学大全
💻 HTML
字号:
<html>



<head><meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>取得本地internet机器的名字及IP地址</title>

<meta content="text/html; charset=gb2312" http-equiv="Content-Type">

<meta content="zyqsj" name="Author">

<meta content="Microsoft FrontPage 4.0" name="GENERATOR">

<meta name="ProgId" content="FrontPage.Editor.Document">

</head>



<body>



<h3 align="center"><b>取得本地internet机器的名字及IP地址</b></h3>

<p><br>

一、下面的例子使用 Winsock API 取得本地主机的名字及地址<br>

&nbsp;&nbsp;&nbsp;&nbsp; void __fastcall TForm1::Button1Click(TObject *Sender)<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; {<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; hostent *p;<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; char s[128];<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; char *p2;<br>

&nbsp;&nbsp;<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //Get the computer name<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; gethostname(s, 128);<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; p = gethostbyname(s);<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 

Memo1-&gt;Lines-&gt;Add(p-&gt;h_name);

<p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //Get the IpAddress<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; p2 = inet_ntoa(*((in_addr 

*)p-&gt;h_addr));<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 

Memo1-&gt;Lines-&gt;Add(p2);<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; }

<p>&nbsp; void __fastcall TForm1::FormCreate(TObject *Sender)<br>

&nbsp;&nbsp;&nbsp; {<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WORD wVersionRequested;<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WSADATA wsaData;

<p>&nbsp;&nbsp;&nbsp; //Start up WinSock<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; wVersionRequested = MAKEWORD(1, 1);<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WSAStartup(wVersionRequested, 

&amp;wsaData);<br>

&nbsp;&nbsp;&nbsp;&nbsp; }

<p>&nbsp; void __fastcall TForm1::FormDestroy(TObject *Sender)<br>

&nbsp;&nbsp;&nbsp; {<br>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WSACleanup();<br>

&nbsp;&nbsp;&nbsp; }<br>

&nbsp;<br>

&nbsp;</p>



</body>



</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -