Hola, soy de Peru. Espero te sirva
Yo uso :
salida era para ver si es por pantalla o impresora
IF SALIDA = 1
SET PRINT ON
SET DEVICE TO PRINT
SET MARGIN TO 10
A = CHR(27)+'&l1O'+CHR(27)+'10U'+CHR(27)+'(s0p16.67h8.5v0s0b0T'
?A
ELSE
SET DEVICE TO PRINT
SET PRINTER TO...
Hi, somebody remember the chr() function for exampel chr(18) is 10 cpi ch(15) is 16.6 cpi and chr(?) is 12 cpi
Other question, I work in foxpro 2.6 dos, and print in a lan (NT) printer (Epson FX), I define the printer in windows printer definitions, en properties, detail, print in port...
I hope help you
***************
PROCED PPL655AC
***************
SET DELETE OFF
USE PPLPDV INDEX PDVKEY
XKEY = SPACE(13)
CON = 0
DO WHILE .NOT. EOF()
KEY = STR(PMPREG,6,0)
IF XKEY <> KEY
XKEY = KEY
SKIP
LOOP
ENDIF
skip -1
DELETE
skip 2
ENDDO
PACK
SET...
works to me :
...
....
DEFINE WINDOW Pass FROM 13,19 TO 20,59 TITLE ' Password ' SHADOW COLOR SCHEME 7
ACTIVA WINDOW Pass
DO PASSWORD
RELEA WINDOW Pass
FOR cnt = 1 TO 40
RELEASE WINDOW ("letter"+alltrim(str(cnt)))
ENDFOR
CLEA
IF !wacceso
DO _Alerta
WAIT ' Acceso Denegado...
Hi I used in a A4 and works good, the &110 is the orientation 16.67 is condensade (I'm not speak english, sorry)
I thing the 8.5 can change to A3
SET PRINT ON
SET DEVICE TO PRINT
SET MARGIN TO 10
A = CHR(27)+'&l1O'+CHR(27)+'10U'+CHR(27)+'(s0p16.67h8.5v0s0b0T'
?A
...
I'm try to read a bar code unit (for personal systems) is a long history, now I've the unit without software....
I'm shure it's possible
Manuel Fernandez
Lima, Peru
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.