comunicacion TCP/IP

[jmbarrio]

Estoy intentando mandar una cadena de caracteres via TCP/IP para que la reciba otro ordenador. Estoy empleando un componente Tserversocket, cuando pulso un boton debe enviar el mensaje al otro ordenador.
El código es el siguiente
serversocket1.Active:=true;
serversocket1.Port:=650;
serversocket1.Socket.SendText('23 M9999MM');
serversocket1.Socket.Close;
serversocket1.Active:=false;

Cuando llega al sendtext me da el error windows socket error 10057 on API send.

Como debo configurar el serversocket1, y cual es el codigo fuente correcto para que funcione?

Muchas gracias por vuestra atención