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

Reply via email to