Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование адресов [D5, Win95/98, WinME]

Свой © (2002-05-15 11:40:00)
Скажи пожалуйста как преобразовать допустим mail.ru ну в смысле host в привыйный 127.0.0.1 ну типа адресс ???
Спасибо!!!

Свой (2002-05-19 02:41:00) [1]
О большое спасибо !!!

Malder (2002-05-19 01:41:00) [2]
Boger, http://delphibase.endimus.com/?action=viewfunc&topic=netadress&index=1

Anatoly Podgoretsky (2002-05-18 23:54:00) [3]
А приведенный пример не подходит?

Boger (2002-05-18 22:13:00) [4]
так дай ссылку на UBPFD или хоть рассшифруй хотяб!

Свой (2002-05-18 13:55:00) [5]
Простите но я наверно туп!!!
Можно конкретный пример дать приобразования !!!
Спасибо !!!

Malder (2002-05-17 22:14:00) [6]
Немного не про теме.

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

Wonder (2002-05-17 11:24:00) [7]
Читаем описание ф-ции inet_ntoa():

Description: Convert a network address into a stringin dotted format.

Свой (2002-05-17 11:07:00) [8]
Простите но возможно не корректно задал вопрос, мне вы майл.ру перевести в 127.0.0.1 вид но чтоб он был стринг а ???

Dimka Maslov (2002-05-16 09:40:00) [9]
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;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »