Wilfried, Not sure, but I think he meant this one:
procedure TForm1.WSocket1DnsLookupDone(Sender: TObject; ErrCode: Word); begin if ErrCode = 0 then Memo1.Lines.AddStrings(TWSocket(Sender).DnsResultList) else if ErrCode >= 10000 then Memo1.Lines.Add('Error: ' + WSocketErrorDesc(ErrCode)) else Memo1.Lines.Add('Unknown Error!'); end; procedure TForm1.ButtonOKClick(Sender: TObject); begin WSocket1.DnsLookup('www.adomain.com'); end; > Hello Ja, > > I think what you wants is the TDnsQuery component (also in ICS package). > WSocket.DNSLookup resolve a hostname to IP address. > > --- > Rgds, Wilfried [TeamICS] > http://www.overbyte.be/eng/overbyte/teamics.html > http://www.mestdagh.biz > > Tuesday, January 3, 2006, 22:18, Ja wrote: > > >> ---- Wiadomosc Oryginalna ---- >> Od: Wilfried Mestdagh <[EMAIL PROTECTED]> >> Do: ICS support mailing <twsocket@elists.org> >> Data: Tue, 3 Jan 2006 22:00:48 +0100 >> Temat: Re: [twsocket] WSocket DNSLookup. > >>> Hello Ja, >>> >>>> Is there any way to do a WSocket DNSLookup and OnLookupDone get >>>> adress of host that have been looked up? >>> >>> I do not understeand the question. CAn you please rephrase it ? >>> > >> I wouldlike to lookup some hosts ( with WSocket.DnsLookup($domain) ) >> , and at the end add a results to memo, but... when there is no >> result (for example domain doesnt exist) i would like to add text >> "$domain doesnt exist!" ... but have no idea how do i get $domain >> string in OnLookupDone event... -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be