TIdDNSResolver Problem - Connection reset by peer

[bigkahoona]

Danke für deine Antwort.
Bei mir ergibt dein Code 1:1 übernommen allerdings Fehler.
Wenn ich ihn abändere gibt das

Delphi-Quellcode:

var
  pAddr: PCardinal;
begin
  with IdDNSResolver1 do
  begin
    QueryType := [qtA];
    Resolve('www.delphipraxis.net');
    pAddr := @QueryResult.Items[0].RData[1];
    ShowMessage(IpStr(pAddr^));
  end;
end;

ergibt:

Zitat:

[DCC Fehler] Unit2.pas(69): E2003 Undefinierter Bezeichner: 'IpStr'

Und wenn ich IpStr als String deklariere kriege ich ein

Zitat:

[DCC Fehler] Unit2.pas(70): E2066 Operator oder Semikolon fehlt