VISOR TPV

16/06/2006 - 16:27 por JRA | Informe spam
Buenas estoy creando un TPV en VFP y tengo que mandar datos a un visor que
tengo conectado al puerto Com3.

En fox2.6 tenia un programilla que lo hacia pero ahora en vfp7 no consigo
que funcione.

alguien sabe como hacerlo?

gracias

el programa que usaba para utilizar el visor en 2.6 es el siguiente:
set LIBRARY TO SYS(2004)+'foxtools.fll' ADDITIVE
BUILDCOMMD = REGFN('BuildCommDCB','@C@C','I')
CLOSECOMMF = REGFN('CloseComm','I','I')
OPENCOMMFN = REGFN('OpenComm','@CII','I')
READCOMMFN = REGFN('ReadComm','I@CI','I')
SETCOMMSTA = REGFN('SetCommState','@C','I')
WRITECOMMF = REGFN('WriteComm','I@CI','I')
DEV_VIS = CALLFN(OPENCOMMFN,@VISOR,100,100)
COMMDCB = REPLICATE(CHR(0), 25)
= CALLFN(BUILDCOMMD,@DEFVISOR,@COMMDCB)
= CALLFN(SETCOMMSTA,@COMMDCB)
Buf_vis =&vCLR
BUF_VIS = BUF_VIS+TEXEMP
BUF_VIS = BUF_VIS+TEXDES
= CALLFN(WRITECOMMF,DEV_VIS,@BUF_VIS,LEN(BUF_VIS))

pero ahora me da error no existe CloseComm y OpenComm

Preguntas similare

Leer las respuestas

#1 jmvalero
23/06/2006 - 11:56 | Informe spam
"JRA" escribió:

Buenas estoy creando un TPV en VFP y tengo que mandar datos a un visor que
tengo conectado al puerto Com3.

En fox2.6 tenia un programilla que lo hacia pero ahora en vfp7 no consigo
que funcione.

alguien sabe como hacerlo?

gracias

el programa que usaba para utilizar el visor en 2.6 es el siguiente:
set LIBRARY TO SYS(2004)+'foxtools.fll' ADDITIVE
BUILDCOMMD = REGFN('BuildCommDCB','@','I')
CLOSECOMMF = REGFN('CloseComm','I','I')
OPENCOMMFN = REGFN('OpenComm','@CII','I')
READCOMMFN = REGFN('ReadComm','','I')
SETCOMMSTA = REGFN('SetCommState','@C','I')
WRITECOMMF = REGFN('WriteComm','','I')
DEV_VIS = CALLFN(OPENCOMMFN,@VISOR,100,100)
COMMDCB = REPLICATE(CHR(0), 25)
= CALLFN(BUILDCOMMD,@DEFVISOR,@COMMDCB)
= CALLFN(SETCOMMSTA,@COMMDCB)
Buf_vis =&vCLR
BUF_VIS = BUF_VIS+TEXEMP
BUF_VIS = BUF_VIS+TEXDES
= CALLFN(WRITECOMMF,DEV_VIS,@BUF_VIS,LEN(BUF_VIS))

pero ahora me da error no existe CloseComm y OpenComm





Respuesta Responder a este mensaje
#2 jmvalero
23/06/2006 - 11:57 | Informe spam
ahora puedes usar FOPEN() o FCLOSE()

mas sencillo

saludos

"JRA" escribió:

Buenas estoy creando un TPV en VFP y tengo que mandar datos a un visor que
tengo conectado al puerto Com3.

En fox2.6 tenia un programilla que lo hacia pero ahora en vfp7 no consigo
que funcione.

alguien sabe como hacerlo?

gracias

el programa que usaba para utilizar el visor en 2.6 es el siguiente:
set LIBRARY TO SYS(2004)+'foxtools.fll' ADDITIVE
BUILDCOMMD = REGFN('BuildCommDCB','@','I')
CLOSECOMMF = REGFN('CloseComm','I','I')
OPENCOMMFN = REGFN('OpenComm','@CII','I')
READCOMMFN = REGFN('ReadComm','','I')
SETCOMMSTA = REGFN('SetCommState','@C','I')
WRITECOMMF = REGFN('WriteComm','','I')
DEV_VIS = CALLFN(OPENCOMMFN,@VISOR,100,100)
COMMDCB = REPLICATE(CHR(0), 25)
= CALLFN(BUILDCOMMD,@DEFVISOR,@COMMDCB)
= CALLFN(SETCOMMSTA,@COMMDCB)
Buf_vis =&vCLR
BUF_VIS = BUF_VIS+TEXEMP
BUF_VIS = BUF_VIS+TEXDES
= CALLFN(WRITECOMMF,DEV_VIS,@BUF_VIS,LEN(BUF_VIS))

pero ahora me da error no existe CloseComm y OpenComm





email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida