Скачать: CL | DM;

Определение IP   Найти похожие ветки 

← →
Std   (2006-03-29 12:14) [0]

доброго времени суток, подскажит как програмно узнать ip своего компа

---

← →
AbrosimovA   (2006-03-29 14:19) [1]

Если используешь TTCPClient, то у него есть метод LocalHostAddr, который возвращает искомый IP.

---

← →
Yegorchic ©   (2006-03-29 14:52) [2]

Или можно использовать TIdIPWatch, а вообще, надо бы FAQ посмотреть... :\

---

← →
apic ©   (2006-03-29 15:39) [3]

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;

//если прочел, откликнись

---

← →
Evgeny V ©   (2006-03-29 15:47) [4]

Как вариант, конструкция gethostbyname. ПОлучить имя своего коспьютера  gethostname или в параметре gethostbyname передать nil.  Так же появилась более новая функция   getaddrinfo

---

← →
Fay ©   (2006-03-29 23:29) [5]

2 Std (29.03.06 12:14)
1) У компа ip не бывает.
2) Если у тебя 10 сетевых интерфейсов, тебе какой адрес-то?

---

← →
Japp   (2006-03-30 12:36) [6]

127.0.0.1
:)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.041 c