Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.29;
Скачать: CL | DM;

Вниз

Преобразование адресов   Найти похожие ветки 

 
Свой ©   (2002-05-15 11:40) [0]

Скажи пожалуйста как преобразовать допустим mail.ru ну в смысле host в привыйный 127.0.0.1 ну типа адресс ???
Спасибо!!!


 
Dimka Maslov ©   (2002-05-16 09:40) [1]

uses WinSock;


function GetHostByName(HostName: string): string;
var
Error: DWORD;
HostEntry: PHostEnt;
Data: WSAData;
Address: In_Addr;
begin
Error:=WSAStartup(MakeWord(1, 1), Data);
if Error = 0 then begin
HostEntry:=WinSock.gethostbyname(PChar(HostName));
Error:=GetLastError();
if Error = 0 then begin
Address:=PInAddr(HostEntry^.h_addr_list^)^;
Result:=inet_ntoa(Address);
end else begin
Result:="Unknown";
end;
end else begin
Result:="Error";
end;
WSACleanup();
end;


begin
ShowMessage(GetHostByName("www.mail.ru"));
end;


 
Свой ©   (2002-05-17 11:07) [2]

Простите но возможно не корректно задал вопрос, мне вы майл.ру перевести в 127.0.0.1 вид но чтоб он был стринг а ???


 
Wonder ©   (2002-05-17 11:24) [3]

Читаем описание ф-ции inet_ntoa():

Description: Convert a network address into a string in dotted format.


 
Malder ©   (2002-05-17 22:14) [4]

Немного не про теме.

Предлагаю на такие вопросы давать ссылку на UBPFD - пусть люди привыкают =)


 
Свой ©   (2002-05-18 13:55) [5]

Простите но я наверно туп!!!
Можно конкретный пример дать приобразования !!!
Спасибо !!!


 
Boger   (2002-05-18 22:13) [6]

так дай ссылку на UBPFD или хоть рассшифруй хотяб!


 
Anatoly Podgoretsky ©   (2002-05-18 23:54) [7]

А приведенный пример не подходит?


 
Malder ©   (2002-05-19 01:41) [8]

Boger, http://delphibase.endimus.com/?action=viewfunc&topic=netadress&index=1


 
Свой ©   (2002-05-19 02:41) [9]

О большое спасибо !!!



Страницы: 1 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.012 c
1-95354
Leny
2002-07-18 11:21
2002.07.29
Строки в таблице


3-95214
ppcat
2002-07-06 09:04
2002.07.29
ADO, MS SQL 7.0 и обновляемые просмотры


1-95309
AlexAlex
2002-07-16 18:00
2002.07.29
Программное управление положением подписей (Mark) в TChart


3-95260
ALex_Aby
2002-07-07 14:10
2002.07.29
Ищу компанент для доступа к данным без BDE ADO


14-95503
Cranium
2002-07-01 13:43
2002.07.29
Почему код D5 не работает без установленных делфей