Error en la Impresora

[servicomver]

Hola Antonio:

Tengo un programa que usa la clase tdosprn la cual manda a imprimir a una epson lx 300+, debe de funcionar con otro programa que igualmente imprime en esa impresora, el caso es que despues de imprimir unas 10 veces, ya no imprime nada, he notado que lo hace cuando abrimos el segundo programa (es comprado) y se manda a imprimir algo, no se si alguien recuerda que comandos de escape se usan para mandar a la impresora un reset o inicializacion total de la impresora epson lx-300 , (pienso que por ahi pueda estar el problema), ya que actualmente lo hago asi:

cPort:=nPtoFac //Puerto a Imprimir
xFac:=.T.
oPrn := TDosPrn():New(cPort)
oPrn:StartPage() // optional
oPrn:Command("027,064,000,000,000,000,000,000") //Inicializar

oPrn:Command("027,015,000,000,000,000,000,000") //Condensada
oPrn:Command("27,67,33") //32 Renglones de largo
oPrn:Say(3,5,"Pago: " + Alltrim(cPago) )
oPrn:Say(4,5,"Vendedor: " + Alltrim(Str(nVendedor)) + " " + xVendedor )
.
.
....
bastara con oPrn:Command("027,064,000") para inicializar ???
gracias por su ayuda.

SAludos
Veracruz, Mexico

[Antonio Linares]

> bastara con oPrn:Command("027,064,000") para inicializar ???

Lo has probado ?

[servicomver]

Si antonio ya lo intente, tal vez mi pregunta debio ser, si es la unica forma de hacerlo, por que no funciono,
gracias por tu atencion
saludos

[servicomver]

Continuamente se manda a imprimir a puertos lpt1 y lpt2, en Lpt1 tengo instsladas mini-printers para los tickets y en Lpt2 se imprimen las facturas, sucede que a veces no imprime nada en Lpt2 y a veces va imprimiendo bien y saca basura en la impesion, ya cambie los cables paralelos, las impresoras, loc cpu, realmente no tengo ni idea que pueda ocacionar esto, si alguien tiene un idea ????, mucho se los agradeceria
salu2