Проблема с GetHostByName

← →
chernoruk © (2002-04-25 20:45) [0]

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;

← →
Song © (2002-04-26 08:22) [1]

String:=inet_ntoa(PInAddr(host^.h_addr_list)^);

А что такое PInAddr?

Проблема с GetHostByName Найти похожие ветки