Tiesiog techninis: internetas yra sukurtas naudojant TCP / IP jungtis. TCP dalyje aprašoma, kaip du kompiuteriai užmezga ryšį vienas su kitu ir perduoda duomenis. IP dalis pirmiausia susijusi su tuo, kaip gauti žinią internete. Kiekvienas prijungtas įrenginys turi unikalų IP adresą, kuris leidžia kitiems išsiaiškinti kelią į bet kurį kompiuterį visame žiniatinklyje (arba tiksliai visame pasaulyje).
Norėdami gauti kompiuterio, kurį naudojate prisijungę prie interneto, IP adresą, turime iškviesti kai kurias API funkcijas *, apibrėžtas * „Winsock“ įrenginyje.
Mes sukursime „GetIPFromHost“ funkcija, kuri iškviečia kelias „Winsock“ API funkcijas, kad gautų IP. Kad net negalėtume naudoti „WinSock“ funkcijų, turime turėti galiojančią sesiją. Ši sesija sukurta naudojant „WinSock WSAStartup“ funkciją. Pasibaigus mūsų funkcijai, skambinama į SAC palaikymą, kad būtų nutrauktas „Windows Sockets“ API naudojimas. Norėdami gauti kompiuterio IP adresą, turime naudoti „GetHostByName“ kartu su „GetHostName“. Kiekvienas kompiuteris yra vadinamas pagrindiniu kompiuteriu ir mes galime gauti pagrindinio kompiuterio vardą su specialiu funkcijos skambučiu: GetHostName. Tada mes naudojame „GetHostByName“, kad gautume IP adresą, susijusį su šiuo pagrindinio kompiuterio pavadinimu.
Pradėti Delfi ir padėkite vieną Mygtukas ir du Redaguoti langelius ant naujai sukurtos formos. Pridėti „GetIPFromHost“ funkciją, skirtą jūsų įrenginio daliai, ir priskirkite šį kodą mygtuko „OnClick“ įvykių tvarkytojui (žemiau):