Форум: "Сети";
Текущий архив: 2006.08.13;
Скачать: [xml.tar.bz2];
Вниз
Определение 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 вся ветка
Форум: "Сети";
Текущий архив: 2006.08.13;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.038 c
