Текущий архив: 2002.07.22;
Скачать: CL | DM;

Вниз

Преобразование 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;
Скачать: CL | DM;

Наверх

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