Wo ist getaddrinfo?

[muRR]

Hallo!
Ich hoffe, dass ihr mir weiterhelfen könnt. Ich stehe vor dem Problem, dass ich eine Internetanwendung basierend auf der hier dokumentierten WinSock-API programmieren wollte und diese anscheinend nicht vollständig in die Unit WinSock implementiert wurde. Zumindest gibt es bei mir die Funktion getaddrinfo nicht. Dabei wird einem doch dringendst zum Gebrauch dieser Funktion anstelle von gethostbyname geraten.
Weiß da jemand mehr?

[muRR]

Hab es jetzt so gelöst, dass ich die Funktion selbst importiere und die benötigten Typen deklariere. Funktioniert nach ersten Tests auch.

Delphi-Quellcode:

uses
  Windows, WinSock;

type
  PAddrInfo = ^TAddrInfo;
  TAddrInfo = packed record
    ai_flags: Integer;
    ai_family: Integer;
    ai_socktype: Integer;
    ai_protocol: Integer;
    ai_addrlen: LongWord;
    ai_canonname: Array of Char;
    ai_addr: PSOCKADDR;
    ai_next: PAddrInfo;
  end;

function getaddrinfo(const nodename: PChar; const servname : PChar; const hints: PAddrInfo; var res: PAddrInfo): Integer; stdcall; external 'ws2_32.dll' name 'getaddrinfo';
procedure freeaddrinfo(ai: PAddrInfo); stdcall; external 'ws2_32.dll' name 'freeaddrinfo';

implementation

...