怎样得到本机的ip地址？

[linuxgyh]

怎样得到本机的ip地址？

[Atomictry]

(作者不祥):
.cpp中:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
WORD wVersionRequested;
WSADATA wsaData;

//Start up WinSock
wVersionRequested = MAKEWORD(1, 1);
WSAStartup(wVersionRequested, &wsaData);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormDestroy(TObject *Sender)
{
WSACleanup();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
hostent *p;
char s[128];
char *p2;
gethostname(s, 128);//获取指定计算机的名字
p = gethostbyname(s);
p2 = inet_ntoa(*((in_addr *)p->h_addr)); //获取指定计算机的IP地址
Memo1->Lines->Add(p2);
}
//---------------------------------------------------------------------------


.h中加入:

include <WinSock2.h>

[铁拳]

也可以加入tcp控件，看它的 localhostip

[wuxking]

可以用TSock 类，查看 LocalHost属性。

[ppgo]

//---------------------------------------------------------------------------

#include <windows.h>
#include <winsock2.h>
#include <vcl.h>
#pragma hdrstop

//---------------------------------------------------------------------------

#pragma argsused
WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
WORD version = MAKEWORD(1,1);
WSADATA wsaData;
WSAStartup(version, &wsaData);
char name[50];
gethostname(name,50);
hostent* host = gethostbyname(name);
char* adr = inet_ntoa(*(in_addr*)host->h_addr);
AnsiString myip(adr);
ShowMessage(myip);
return 0;
}
//---------------------------------------------------------------------------

[MikeWKL]

mark
up...

[ssyqcwj]

为得到本机的IP地址用得着编程吗?
运行->Ipconfig

[Darnshong]

使用IdIPWatch控件具有CurrentIP、CurrentIP属性和LocalIP()方法