And you have to call connect only once if you use SendTo later. -- [EMAIL PROTECTED] http://www.overbyte.be
----- Original Message ----- From: "Wilfried Mestdagh" <[EMAIL PROTECTED]> To: "ICS support mailing" <twsocket@elists.org> Sent: Saturday, January 21, 2006 10:18 AM Subject: Re: [twsocket] TWSocket sending UDP > Hello Shane, > > You need to call Connect. However you do not have to wait and you can > call SendTo immediatly after calling Connect. > > --- > Rgds, Wilfried [TeamICS] > http://www.overbyte.be/eng/overbyte/teamics.html > http://www.mestdagh.biz > > Saturday, January 21, 2006, 05:08, Shane Mitchell wrote: > >> Hey. > >> I'm trying to use TWSocket to send UDP messages to many different >> hosts. I want to create the TWSocket dynamically, and I don't want to >> have to use Connect/Close every time I send a UDP message. I thought >> I could use the SendTo() procedure to do this, but I have had no >> success. This is my test code to send one UDP message to myself (it >> doesn't work): > >> procedure Test(); >> var >> DestAddr: TSockAddr; >> Data: string; >> begin >> SocketOut := TWSocket.Create(nil); // create the socket >> SocketOut.Proto := 'udp'; // set it to use UDP (shouldnt really need >> this) >> ZeroMemory(@DestAddr, SizeOf(DestAddr)); // clear the address >> DestAddr.sin_family := AF_INET; // we have to use AF_INET >> DestAddr.sin_port := 600; // set the port to 600 >> DestAddr.sin_addr.S_addr := WSocket_inet_addr('127.0.0.1'); // point to >> self >> Data := 'Hello world'; // the message we want to send >> SocketOut.SendTo(DestAddr, SizeOf(DestAddr), @Data[1], Length(Data)); >> // send >> // nb: SocketOut is freed later >> end; > >> Could anyone point out to me what I'm doing wrong. :) > >> Thanks >> - Shane > > -- > 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 -- 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
