Da ja getaddrinfo den zweiten Thread aufmacht, aber nicht mehr schließt, bin ich der Sache mal via API auf die Spur gegangen.
Also mal ohne Indy, stattdessen mit den Jedi API's. Und auch hab ich nach getaddrinfo zwei Threads :/
Irgendwie ätzend und irgendwie spinnt mein System (ne, Plural, sind zwei Win7-Rechner)

zusammenfalten · markieren

Delphi-Quellcode:

uses JwaWS2tcpip, JwaWinSock2;

procedure TForm1.Button4Click(Sender: TObject);
var
  Hints: TAddrInfo;
  LAddrInfo: pAddrInfo;
  ret: Integer;
begin

  FillChar(Hints, SizeOf(Hints), 0);
  Hints.ai_flags := AI_CANONNAME;
  Hints.ai_family:=AF_INET;
  Hints.ai_socktype:=SOCK_STREAM;
  Hints.ai_protocol:=IPPROTO_TCP;
  LAddrInfo := nil;

  ret := getaddrinfo(PChar('localhost'), nil, @Hints, LAddrInfo );

  try
    if ret <> 0 then
      ShowMessage( gai_strerrorA( ret ) );
  finally
    freeaddrinfo( LAddrInfo );
  end;

end;

Zitat von nru:

Da ja getaddrinfo den zweiten Thread aufmacht, aber nicht mehr schließt, bin ich der Sache mal via API auf die Spur gegangen.
Also mal ohne Indy, stattdessen mit den Jedi API's. Und auch hab ich nach getaddrinfo zwei Threads :/
Irgendwie ätzend und irgendwie spinnt mein System (ne, Plural, sind zwei Win7-Rechner)

Nächste - allerdings mangels tieferer Erfahrung mit Schadware - Idee: könnte es sich um einen Trojaner handeln, der sich in getaddrinfo einklinkt?

Das ließe sich durch Tests auf anderen Systtemen klären, z.B. frisch installierte VM, oder andere Entwickler. Den neuen Testcode habe ich noch nicht ausprobiert aber dass getaddrinfo einen Thread startet finde ich sehr ungewöhnlich.