FiveTech Support Forums

pues eso, tengo las secuencias de escape para abrir un cajon de dinero y me va bien con tdosprn, pero con tprinter como lo abro?
Gracias

Francisco Horta wrote:pues eso, tengo las secuencias de escape para abrir un cajon de dinero y me va bien con tdosprn, pero con tprinter como lo abro?
Gracias

Puede ser una solución.

Pero utilizar TDosPrn, solo para abrir el cajón, no se si lo querrá Francisco.

¿Que opiná Antonio?

Saludos, José Mª

Yo lo hago de la siguiente manera.

local cDcb, nBytes
local nComm := OpenComm( "COM1", 1024, 128 )
local nError

if ! BuildCommDcb( "COM1:3000,n,8,1", @cDcb )
nError = GetCommError( nComm )
endif

if ! SetCommState( cDcb )
nError = GetCommError( nComm )
endif

if ( nBytes := WriteComm( nComm, "ATZ0" + Chr( 13 ) ) ) < 0
nError = GetCommError( nComm )
else
endif

if FlushComm( nComm, 0 ) != 0
nError = GetCommError( nComm )
endif

if ! CloseComm( nComm )
nError = GetCommError( nComm )
endif

Espero te sirva

La forma en que lo hace Leandro está muy bien.

mmm gracias a todos, leandro nomas que no use puertos com lo tengo por lpt1 en una miniprinter epson tmu220, el caso es que no quiero cambiar el codigo y escribirlo de nuevo, unicamente quiero agregarle esa ocpion.
Gracias a todos