| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

как получить имя хоста по его IP адресу [D5, D6, Win2k, WinXP]

ALexe ©   (2002-10-30 11:17:00) 

Братья и сестры =о)
Если не в лом - КАК использовать обратное преобразование адресов - т.е. зная IP получить имя хоста ?

заранее благодарен за все предложения!!

---

ALexe   (2002-10-31 10:39:00) [1]

Спасибо за подсказку - я не знал как присвоить этот addr !!!
=o)
Спасибо брат !!!!!

---

Mischka   (2002-10-30 15:39:00) [2]


uses Winsock

function getNameOf(const IP: string): string;
var
h: PHostEnt;
addr: TSockAddr;
GInitData: TWSADATA;
begin
WSAStartup($101, GInitData);
Result:="";
addr.sin_addr.s_addr:=inet_addr(pchar(IP));
if addr.sin_addr.s_addr<>INADDR_NONE then
begin
h:=gethostbyaddr(@addr.sin_addr.s_addr, sizeof(addr), AF_INET);
if h<>nil then Result:=h^.h_name
end;
WSACleanup
end;


---

ALexe   (2002-10-30 11:19:00) [3]

в смыслее на Delphi =0)

---

Наверх