SoloCodigo

Hola, estoy haciendo un cliente/servidor muy basico, trabajo con los componentes   Indy http://www.indyproject.org

no me estan funcionando, si establecen conexion pero fallan
al enviar o recibir datos.

En el cliente pongo este procedimiento:

procedure TFCliente.BComandoClick(Sender: TObject);
var
com: string;
begin
com:= NComando.Text;
UDP.Send(com); // ??enviar string al server
end;

y en el servidor

procedure TFServ.UDPUDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);


begin
comando:= UDP.ReceiveString; // leer un dato enviado desde el cliente.
if comando= '1' then
  begin
   Ejecutar comando 1 //hacer cualquier cosa
  end;
........................

No se donde esta el fallo.

alguien sabe como soluciono este problema? la idea
es que el cliente envie datos (tipo string) y el servidor los lea correctamente, mediante udp.
Gracias.

Aquí hay un ejemplo:

http://rr.exhedra.com/upload_PSC/ftp/Se ... 912002.zip

es de:
http://www.planet-source-code.com/

Espero le sirva.