![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ip by name [D6, Win2k]
Rodin © (2003-09-11 11:15:00)
Приветсвую!
Подскажите как получить ip удаленой машины зная ее имя?
rodin (2003-09-15 09:53:00) [1]
Удалено модератором
Примечание: Offtopic
rodin (2003-09-15 09:50:00) [2]
БОльшое человеческое спасибо
Zeon (2003-09-13 00:48:00) [3]
uses
WinSock;
const
WINSOCK_VERSION = $0101;
function GetIPAddress(Name:String): string;
var
WSAData : TWSAData;
p : PHostEnt;
begin
WSAStartup(WINSOCK_VERSION, WSAData);
p := GetHostByName(PChar(Name));
Result := inet_ntoa(PInAddr(p.h_addr_list^)^);
WSACleanup;
end;
panov (2003-09-11 11:36:00) [4]
GetHostByName