Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-10-2004
Avatar de fabianbbg
fabianbbg fabianbbg is offline
Miembro
 
Registrado: ago 2003
Ubicación: Corrientes, Argentina
Posts: 80
Poder: 21
fabianbbg Va por buen camino
avance hasta corte de hoja, form continuo

Buenas..
Como estan.. tengo un programa que imprime un recibo directamente al puerto de la forma:
la impresora es una Epson lx-300+

Código:
 Var
        F : TextFile;
 begin
          AssignFile(F,'LPT1');
          Rewrite( F);
          Writeln(F, #27, #64, 'TEXTO de Prueba');
          Writeln(F, #13, #12);//cuando finalizo para que haga el line feed
          CloseFile( F);
end;;

Esto funciona bien, pero lo que no he podido lograr es que la impresora al hacer el LF , alimentacion de formulario, despues de que imprime la ultima hoja avance un poco para que permita el corte de la hoja por el troquelado.
Lo raro es que la impresora esta configurada con el "Corte de hoja automatico", pero no se como indicarle que la impresion ha finalizado y que debe avanzar para permitir el corte de hoja.
¿Alguien puede decirme que es lo que le falta al codigo para que avance y permita el corte de hoja?.
Desde ya muchas gracias.. cualquier pregunta o aclaracion.. por favor pregunten
__________________
desde Corrientes, Argentina..
Cuna del Libertador de America

Última edición por fabianbbg fecha: 04-10-2004 a las 23:09:29.
Responder Con Cita
  #2  
Antiguo 04-10-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Cita:
Writeln(F, #13, #12);//cuando finalizo para que haga el line feed
En realidad alimentación de línea es #10 el 13# es retorno de carro y el #12 es salto de página.

Si quieres que avance un par de lineas le mandas linefeed 2 veces.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 04-10-2004
Avatar de fabianbbg
fabianbbg fabianbbg is offline
Miembro
 
Registrado: ago 2003
Ubicación: Corrientes, Argentina
Posts: 80
Poder: 21
fabianbbg Va por buen camino
Marcos ante todo, GRACIAS por la inmediata respuesta,

Claro, jeje.. me disculpo, es cierto..
#13 +#10 es retorno de carro y avance de linea.
Por lo que me rectifico diciendo lo ste:
lo que quiero que haga es justamente lo que hace, es decir avanzar la pagina.. pero como habras leido..ese no es el problema. El punto es que al avanzar la pagina no me da la posibilidad de cortar la hoja con comodidad como deberia.
O sea deberia funcionar asi:
*Comienza la impresion
*imprime una o mas hojas
*termina de imprimir la ultima hoja
*avanza, unos centimetros para permitir cortar la hoja
*al volver a mandar info para impresion, vuelve al comienzo de la hoja para comezar la impresion..
espero haber sido mas claro esta vez

un abrazo
__________________
desde Corrientes, Argentina..
Cuna del Libertador de America

Última edición por fabianbbg fecha: 04-10-2004 a las 23:25:08.
Responder Con Cita
  #4  
Antiguo 04-10-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Supongo que la impresora tendrá un código para avanzar en vertical, habría que saber dicho código y aplicarlo, tendrás que ver el manual de la impresora, suelen traer ejemplos en varios lenguajes.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #5  
Antiguo 04-10-2004
Avatar de fabianbbg
fabianbbg fabianbbg is offline
Miembro
 
Registrado: ago 2003
Ubicación: Corrientes, Argentina
Posts: 80
Poder: 21
fabianbbg Va por buen camino
Cita:
Empezado por marcoszorrilla
Supongo que la impresora tendrá un código para avanzar en vertical, habría que saber dicho código y aplicarlo, tendrás que ver el manual de la impresora, suelen traer ejemplos en varios lenguajes.

Un Saludo.
Claro!! marcos, trae un manual el cual ya lo he leido pero no encontre la respuesta a mi pregunta.. es mas hace referencia al esc/p reference manual en el cual podes encontrar la secuencia de comandos que podria utilizar, yo lo he probado como sigue:

ESC EM Control paper loading/ejecting para 9-Pin

ASCII ESC EM n
Decimal 27 25 n

Parameter range
n = 48, 49, 50, 52, 66, 70, 82
Function
Controls feeding of continuous and single-sheet paper, according to the parameters below:
n = 48 “0” Exits cut-sheet feeder mode
49 “1” Selects loading from bin 1 of the cut-sheet feeder
50 “2” Selects loading from bin 2 of the cut-sheet feeder
52 “4” Enters cut-sheet feeder mode
66 “B” Loads paper from the rear tractor
70 “F” Loads paper from the front tractor
82 “R” Ejects one sheet of single-sheet paper

O sea enviando en ascii ESC EM R , deberia hacer un eject de la hoja, que es justamente lo que quiero, pero no es asi. Estoy segurisimo de que se me esta escapando algo, pero no se que es..
Marcos de nuevo, desde ya muchas gracias
__________________
desde Corrientes, Argentina..
Cuna del Libertador de America
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 20:50:48.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi