Форум: "Сети";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
ВнизКак узнать программно свой IP? Найти похожие ветки
← →
kex (2001-12-19 12:05) [0]Народ, поскажите как мне узнать программно свой IP, желательно чезер Win API функции...?
← →
Snake2000 (2001-12-19 12:39) [1]var WSAData : TWSAData;
p : PHostEnt;
Name : array [0..$FF] of Char;
begin
WSAStartup($0101, WSAData);
GetHostName(name, $FF);
p := GetHostByName(Name);
showmessage(inet_ntoa(PInAddr(p.h_addr_list^)^));
WSACleanup;
end;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c