DNS über die IP bekommen

[Sprint]

Also Windows stellt dafür auch eine API zur Verfügung, gethostbyaddr.

Delphi-Quellcode:

function GetHostByAddr(const IP: String): String;
var
  Addr: Integer;
  HostEnt: PHostEnt;
begin

  Addr := inet_addr(PChar(IP));
  HostEnt := WinSock.gethostbyaddr(@Addr, 4, PF_INET);
  Result := HostEnt^.h_name;

end;