Hola,
¿Es posible, utilizando las funciones propias de FWHX manejar al menos dos (2) puertos COMM ?
En caso que no.... ¿ Que puedo hacer ?
Abrazos,
Para Antonio: Manejo de puertos Comm
- jllinas
- Posts: 189
- Joined: Fri Oct 14, 2005 12:33 am
- Location: Santo Domingo, Dominican Republic
- Contact:
Para Antonio: Manejo de puertos Comm
Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
Yo estoy usando varios puertos COM sin ningun problema,
El Codigo que uso
El Codigo que uso
Code: Select all
...
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
- Posts: 189
- Joined: Fri Oct 14, 2005 12:33 am
- Location: Santo Domingo, Dominican Republic
- Contact:
Gracias Amigo,
Es justo lo que quería saber...!
Cuando creas cBuffer ¿ Que tamaño le asignas ?
Abrazos,
Es justo lo que quería saber...!
Cuando creas cBuffer ¿ Que tamaño le asignas ?
Abrazos,
Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: