Preprosto tehnično: internet je zgrajen na TCP / IP povezavah. V delu TCP je opisano, kako sta dva računalnika vzpostavila povezavo in prenašala podatke. Del IP obravnava predvsem to, kako sporočilo speljati po internetu. Vsak povezan stroj ima edinstven IP naslov, ki omogoča drugim, da sami ugotovijo pot do katerega koli računalnika po vsem svetu (ali natančno po vsem svetu).
Za pridobitev naslova IP računalnika, ki ga uporabljate, ko ste povezani z internetom, moramo poklicati nekatere funkcije API-ja *, definirane * v Winsock enoti.
Ustvarili bomo GetIPFromHost funkcija, ki pokliče več funkcij Winsock API, da bi dobili IP. Preden lahko sploh uporabimo funkcije WinSock, moramo imeti veljavno sejo. Ta seja je ustvarjena s funkcijo WinSock WSAStartup. Na koncu naše funkcije se izvede klic s SAP-jem, da bi prenehali uporabljati API-je za Windows Sockets. Za pridobitev naslova IP računalnika moramo v povezavi z GetHostName uporabiti GetHostByName. Vsak računalnik se imenuje gostitelj in ime gostitelja lahko dobimo s klicem posebne funkcije: GetHostName. Nato uporabimo GetHostByName za pridobitev naslova IP, povezanega s tem imenom gostitelja.
Začni Delphi in postavite eno Gumb in dva Uredi polja na novo ustvarjenem obrazcu. Dodajte GetIPFromHost funkcijo izvajalnemu delu vaše enote in dodelite naslednjo kodo upravljavcu dogodkov OnClick gumba (spodaj):