Lectura desde puerto comm

24/03/2005 - 18:55 por Gustavo R. Machado | Informe spam
Hola Amigos, les cuento que ando renegando con una balanza, supongo que
el codigo que aqui les envio es el correcto, pero cuando lo ejecuto no lo
lee alguien me tira una soga????



Gracias

Aqui va el codigo del Boton

public peso
WITH THISFORM.OLECONTROL1
.COMMPORT = 1

.SETTINGS = "1200,N,8,1"
.PORTOPEN = .T.
.INPUTLEN = 0
.INPUTMODE = 0
peso=""

FOR I = 0 TO 250

peso= .input + CHR(13)
THISFORM.TEXT1.VALUE = peso

ENDFOR
.PORTOPEN = .F.
ENDWITH



PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
 

Leer las respuestas

#1 Luis María Guayán
24/03/2005 - 19:32 | Informe spam
Prueba con esta clase. Yo la tengo implementada en una balanza.

http://www.portalfox.com/modules.ph...ls&lid6&ttitle=ViewComm


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos

"Gustavo R. Machado" escribió en el mensaje
news:
Hola Amigos, les cuento que ando renegando con una balanza, supongo que
el codigo que aqui les envio es el correcto, pero cuando lo ejecuto no lo
lee alguien me tira una soga????



Gracias

Aqui va el codigo del Boton

public peso
WITH THISFORM.OLECONTROL1
COMMPORT = 1

SETTINGS = "1200,N,8,1"
PORTOPEN = .T.
INPUTLEN = 0
INPUTMODE = 0
peso=""

FOR I = 0 TO 250

peso= .input + CHR(13)
THISFORM.TEXT1.VALUE = peso

ENDFOR
.PORTOPEN = .F.
ENDWITH



PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Preguntas similares