Ver Mensaje Individual
  #13  
Antiguo 21-02-2013
VictorPenyalver VictorPenyalver is offline
Miembro
 
Registrado: abr 2006
Posts: 19
Reputación: 0
VictorPenyalver Va por buen camino
Buenos días,

Ya he podido realizar pruebas, y no ha funcionado.
El conversor RS232/TCP tiene una web de configuración donde se le indican los parámetros necesarios para convertir una comunicación tcp en una serie.

Con todo lo anterior bien configurado debería recibir los comandos que quiero enviar al dispositivo(mo 63) por la ip 192.168.100.111 en el puerto 10001 , y convertirlo en una comunicación serie (con el mo 63) con los parámetros: Baud Rate = 19200, Data Bits = 8, Stop bits = 1, Parity = 0, Flow Control = None, FIFO = Enable.

Vamos, que le envío algo al dispositivo desde mi pc a través de un socket pero es como si lo enviara por el puerto serie.

Éste es el código que uso para enviar el comando. El comando es un 5 (00000101) como bien me indico Al Gonzalez.


Código Delphi [-]
var

   buffer : array [0..1] of byte;
   mem_ste : TMemoryStream;

begin

  if ClientSocket1.Active then begin
       
       mem_ste := TMemoryStream.Create;
       buffer[0] := 5;
       mem_ste.Write(buffer[0],length(buffer));
       ClientSocket1.Socket.SendStream(mem_ste);

  end else ShowMessage('El puerto está cerrado');

end;

Puede tener algo que ver el bit Stop? Yo solo envío un byte y no se si éste bit va dentro del dato o no.
Que hago mal? El dispositivo no responde a nada de lo que le envío, y funciona bien con su software (que paro antes de hacer las pruebas para que no haya conflictos).

Muchas gracias por vuestra ayuda!
Responder Con Cita