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

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

Подскажите как определить IP адресс используя WinAPI [D7, WinXP]

chili ©   (2005-05-31 15:41:00) 

Подскажите как определить IP адресс используя WinAPI?

---

Kerk   (2005-05-31 23:23:00) [1]

WinSock вроде

---

Kerk   (2005-05-31 23:23:00) [2]

Serg1981   (31.05.05 23:15) [3]
типаTWSAData ?

привычка? :)))

---

Serg1981   (2005-05-31 23:15:00) [3]

А в каком модуле описан типа TWSAData ?

---

chili   (2005-05-31 15:59:00) [4]

> DVM

Большое вам спасибо за помошь

---

DVM   (2005-05-31 15:46:00) [5]

function GetLocalIP:string;
var
 WSAData : TWSAData;
 p : PHostEnt;
 Name : array [0..$FF] of Char;
begin
 WSAStartup($0101, WSAData);
 GetHostName(name, $FF);
 p := GetHostByName(Name);
 Result:=(inet_ntoa(PInAddr(p.h_addr_list^)^));
 WSACleanup;
end;

---

Наверх