Namen der Netzwerk-Verbindungen auslesen

[himitsu]

Reicht dir das verlinkte "Example" nicht?

Und so schwer ist diese kleine API auch nicht zu verstehn.
Man muß nur ein paar wenige Zeilen im MSDN nachlesen und schon kommt man z.B. auf Sowas:

Delphi-Quellcode:

var
  Len:   ULONG;
  AI, M: PIP_ADAPTER_INFO;
  Err:   HRESULT;
begin
  Len := 0;
  GetAdaptersInfo(nil, Len);
  GetMem(M, Len);
  try
    AI := M;
    Err := GetAdaptersInfo(AI, Len);
    if Err <> ERROR_SUCCESS then
      RaiseLastOSError(Err);
    while Assigned(AI) do begin
      ShowMessage(AI.Description + ' : ' + AI.IpAddressList.IpAddress.S);

      AI := AI.Next;
    end;
  finally
    FreeMem(M);
  end;
end;