Форум: "Сети";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
ВнизПреобразование IP Найти похожие ветки
← →
Фантом (2002-05-11 10:56) [0]Подскажите пожалйста, как преобразовать IP к примеру: http://melitopol.net к правильному четырех байтовому виду.
Заранее спасибо.
← →
Song (2002-05-11 11:04) [1]Это делает DNS сервер.
← →
Anatoly Podgoretsky (2002-05-11 12:20) [2]193.41.172.98
function GetIPAddress(Name:String): string;
var
WSAData : TWSAData;
p : PHostEnt;
begin
WSAStartup($0101, WSAData);
p := GetHostByName(PChar(Name));
if Assigned(P) then
Result := inet_ntoa(PInAddr(p.h_addr_list^)^)
else begin
Result := "";
end;
WSACleanup;
end;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c