![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблема с GetHostByName
chernoruk © (2002-04-25 20:45:00)Type
pHostInfo=^thostInfo;
ThostInfo = record
h_name: PChar;
h_aliases: ^PChar;
h_addrtype: Smallint;
h_length: Smallint;
h_addr_list: ^PChar;
end;
...
var
host :pHostInfo;
address :integer;
begin
host:=gethostbyname(pChar("localhost"));
address:=host^.h_addr_list ????????(что писать дальше, чтоб в результате получить 127.0.0.1)
end;
chernoruk (2002-04-29 07:38:00) [1]А что такое PInAddr?
Song (2002-04-26 08:22:00) [2]String:=inet_ntoa(PInAddr(host^.h_addr_list)^);