DNS Server nach IP befragen ?

[Basilikum]

Zitat von stoxx:

1000 Dank ! funktioniert super

nur eine Frage noch, warum kommen immer gleich 3 IP Adressen ?
bei DP z.B.

81.209.184.99
62.141.48.136
62.141.49.157

nutze den DNS Server der Deutschen Telekom '194.25.2.131'

IP 2 und 3 sind die Adressen der für die Domain authoritiven DNS-Server aus der "Additional Section" der DNS-Antwort...

mittels folgender Erweiterung werden nur noch die Adressen von Records verwendet, deren Name mit der Anfrage übereinstimmen:

Delphi-Quellcode:

...
if (idDnsResolver.QueryResult.Items[I] is TARecord) and (SameText(Address,idDnsResolver.QueryResult.Items[I].Name)) then begin
  A := (idDnsResolver.QueryResult.Items[I] as TARecord);
  Result := Result + A.IPAddress + ',';
end;
...