Форум: "WinAPI";
Текущий архив: 2005.07.31;
Скачать: [xml.tar.bz2];
ВнизПодскажите как определить IP адресс используя WinAPI Найти похожие ветки
← →
chili (2005-05-31 15:41) [0]Подскажите как определить IP адресс используя WinAPI?
← →
DVM © (2005-05-31 15:46) [1]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;
← →
chili (2005-05-31 15:59) [2]> DVM
Большое вам спасибо за помошь
← →
Serg1981 (2005-05-31 23:15) [3]А в каком модуле описан типа TWSAData ?
← →
Kerk © (2005-05-31 23:23) [4]WinSock вроде
← →
Kerk © (2005-05-31 23:23) [5]Serg1981 (31.05.05 23:15) [3]
типа TWSAData ?
привычка? :)))
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2005.07.31;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.04 c