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
