Yksinkertaisesti tekninen: Internet on rakennettu TCP / IP-yhteyksille. TCP-osa kuvaa kuinka kaksi tietokonetta muodostaa yhteyden toisiinsa ja siirtää tietoja. IP-osa käsittelee ensisijaisesti kuinka saada viesti reititettäväksi Internetin kautta. Jokaisella kytketyllä koneella on ainutlaatuinen IP-osoite, jonka avulla muut voivat selvittää polun mihin tahansa tietokoneeseen ympäri maailmaa (tai tarkkaan maailmaa).
Jotta voisimme saada tietokoneesi IP-osoitteen, kun olet yhteydessä Internetiin, joudumme kutsumaan joitain Winsock-yksikön API-toimintoihin * * *.
Aiomme luoda GetIPFromHost toiminto, joka kutsuu useita Winsock API -toimintoja IP: n saamiseksi. Ennen kuin voimme edes käyttää WinSock-toimintoja, meillä on oltava kelvollinen istunto. Tämä istunto luodaan WinSock WSAStartup-toiminnolla. Toiminnomme lopussa soitetaan SAC-leanup-palveluun Windows Sockets -sovellusliittymien käytön lopettamiseksi. Tietokoneen IP-osoitteen saamiseksi meidän on käytettävä GetHostByName yhdessä GetHostName -sovelluksen kanssa. Jokaista tietokonetta kutsutaan isäntänä ja voimme saada isäntänimen erityisellä funktiokutsulla: GetHostName. Käytämme sitten GetHostByName -sovellusta IP-osoitteen saamiseen, joka liittyy tähän isäntänimeen.
alkaa Delfoi ja aseta yksi nappi ja kaksi Muokata ruudut vasta luodussa lomakkeessa. Lisää GetIPFromHost -toiminto yksikön toteutusosaan ja määritä seuraava koodi painikkeen OnClick-tapahtumakäsittelijälle (alla):