IdDNSResolver mit Indy 10

[Noone9]

Hey habs hingekriegt, vielen Dank für die schnelle und kompetente Hilfe.
Hier mein Code:

Code:

...
idDNSResolver := TIdDNSResolver.Create(self);
  idDNSResolver.QueryType := [qtA];
  idDNSResolver.Host:='62.72.64.237';
  IdDNSResolver.Resolve(Edit1.Text);
  
  for x := 0 to IdDNSResolver.QueryResult.Count - 1 do
    begin
      DnsResource := IdDNSResolver.QueryResult[x];

      qtar := TARecord(DnsResource); 
      ip:=(qtar.IPAddress);
    ...