Para Antonio: Manejo de puertos Comm

[jllinas]

Hola,

¿Es posible, utilizando las funciones propias de FWHX manejar al menos dos (2) puertos COMM ?

En caso que no.... ¿ Que puedo hacer ?

Abrazos,

[Moisoft]

Yo estoy usando varios puertos COM sin ningun problema,

El Codigo que uso

Code: Select all  Expand view  RUN


...

nPort1 := InitComm( "COM1" )
nPort2 := InitComm( "COM2" )

ReadComm( nPort1, @cBuffer )
? cBuffer
ReadComm( nPort2, @cBuffer )
? cBuferr
....

**********************************
Static Function InitComm( Puerto )

   Local cDcb
   Local nComm := 0
   
   Default Puerto := "COM1"
   nComm := OpenComm( Puerto, 1024, 128 )

   if !BuildCommDcb( Puerto+":9600,n,8,1", @cDcb )
      MsgStop( "Error BUILD Dcb!" )
      Return( 0 )
   Endif

   if !SetCommState( nComm, cDcb )
      MsgStop( "Error Abriendo Puerto "+Puerto+":!" )
      Return( 0 )
   Endif

Return( nComm )



[jllinas]

Gracias Amigo,

Es justo lo que quería saber...!

Cuando creas cBuffer ¿ Que tamaño le asignas ?

Abrazos,

[Antonio Linares]

Julio,

Se pueden manejar tantos puertos simultaneamente como se necesite.

Es algo que se implementó en FWH 8.01

[karinha]

Julio,

Se pueden manejar tantos puertos simultaneamente como se necesite.

Es algo que se implementó en FWH 8.01

Maestro Antonio, entonces la LIB HBCOMM.LIB no és mas necesaria?

Best regards, saludos.

[Antonio Linares]

João,

> entonces la LIB HBCOMM.LIB no és mas necesaria?

No, no hace falta

[karinha]

João,

> entonces la LIB HBCOMM.LIB no és mas necesaria?

No, no hace falta

Excelente Maestro!!! Mui buena Noticia.

Best regards, saludos.