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-05-2005
Ricsato Ricsato is offline
Miembro
 
Registrado: oct 2003
Ubicación: Mexicali, Mexico
Posts: 72
Poder: 21
Ricsato Va por buen camino
Impresion En Lpt1

Hola a todos en el Foro, estoy mandando imprimir un Ticket en una impresora matricial Star-SP200 y lo hago enviando la impresion en ascii al Lpt1 de la siguiente forma:

AssignFile(Lst,'LPT1');
Writeln(LST,' BAJA OPTICA');
Writeln(Lst,'');
Writeln(Lst,'Cliente : ' + eClienteNombre.Text);
Writeln(Lst,'------------------------------------------');
CloseFile(Lst);

Y todo esto sale en letra normal, se que existe una forma para indicarle a la impresora para que pueda remarcar la letra y salga del mismo tamaño pero en negritas, ademas de otra manera de indicarle que imprima las letras mas gruesas o de tamaño mas grande, en este caso para mi encabezado y todo esto haciendo una impresion al LPT1.

Me gustaria que alguien me dijera como puedo hacerle para poder imprimir de esta manera!!, de antemano gracias por su ayuda.

Ricardo.
Mexicali, B.C., Mexico.
Responder Con Cita
  #2  
Antiguo 04-05-2005
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
Para eso tienes que conseguir los códigos de escape de la impresora, esto puede ser bien en la página Web del fabricante o llamar al teléfono de contacto que tengan y pedirlos.

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-05-2005
Ricsato Ricsato is offline
Miembro
 
Registrado: oct 2003
Ubicación: Mexicali, Mexico
Posts: 72
Poder: 21
Ricsato Va por buen camino
Tengo los Codigos!

Hola, tengo los codigos de la impresora, pero lo que no se es como indicarselos por programacion en Delphi, si lo que tengo es lo siguiente:

var
Lst : TextFile;
...........
AssignFile(Lst,'LPT1');
Rewrite(Lst);
Try
Writeln(Lst,'No hay devoluciones en Efectivo.');
Writeln(Lst,'Unicamente en productos.');
CloseFile(Lst);
Except
CloseFile(Lst);
End;

Lo que no se, es en que parte del Writeln(''), los tengo que indicar, si por ejemplo me dice el manual que para expandir el tamaño de un caracter, su codigo es: <SI> y en hexadecimal es 0E, como tengo que indicarlos?, gracias.

Ricardo.
Mexicali, B.C., Mexico
Responder Con Cita
  #4  
Antiguo 04-05-2005
Avatar de vic_ia
vic_ia vic_ia is offline
Miembro
 
Registrado: ene 2004
Posts: 238
Poder: 21
vic_ia Va por buen camino
hola...

yo los mando como caracteres y obviamente codificados en decimal,... por ejemplo el caracter que quieres enviar 0E (en hexadecimial) seria el 14 en decimal...por lo que lo enviaria asi...
Código Delphi [-]
writeln(Lst, #14)
espero te sirva...

saludos...
Responder Con Cita
  #5  
Antiguo 04-05-2005
Ricsato Ricsato is offline
Miembro
 
Registrado: oct 2003
Ubicación: Mexicali, Mexico
Posts: 72
Poder: 21
Ricsato Va por buen camino
Gracias!!

Muchas gracias amigo!!, era justo lo que necesitaba...

Ricardo.
Mexicali, B.C., Mexico
Responder Con Cita
  #6  
Antiguo 16-03-2007
leonelpereda leonelpereda is offline
Miembro
 
Registrado: may 2006
Posts: 11
Poder: 0
leonelpereda Va por buen camino
Cita:
Empezado por vic_ia
hola...

yo los mando como caracteres y obviamente codificados en decimal,... por ejemplo el caracter que quieres enviar 0E (en hexadecimial) seria el 14 en decimal...por lo que lo enviaria asi...

Código Delphi [-]writeln(Lst, #14)


espero te sirva...

saludos...
Hola

Tengo un problema parecido he probado con el #14 y funciona muy bien, pero cuando trato de poner double height con <ESC> "h" "1" es decir #27'h1' y no hace nada.

Gracias,
Leonel
Responder Con Cita
  #7  
Antiguo 17-03-2007
[basti] basti is offline
Miembro Premium
 
Registrado: ago 2004
Posts: 388
Poder: 20
basti Va por buen camino
Seguro que es "h""1" ? normalmente en los manuales de impresora mezclan los tipos y uno se forma un lío.

Por lo general ponen los códigos ESC en hexadecimal, las letras en formato texto y los números en decimal.

Supongo que lo que tendrás que mandar en tu caso es:
#27 + 'h' + #1
Responder Con Cita
  #8  
Antiguo 18-03-2007
leonelpereda leonelpereda is offline
Miembro
 
Registrado: may 2006
Posts: 11
Poder: 0
leonelpereda Va por buen camino
Unhappy

Cita:
Empezado por basti
Seguro que es "h""1" ? normalmente en los manuales de impresora mezclan los tipos y uno se forma un lío.

Por lo general ponen los códigos ESC en hexadecimal, las letras en formato texto y los números en decimal.

Supongo que lo que tendrás que mandar en tu caso es:
#27 + 'h' + #1
Hola,

De hecho he probado de ambas formas #27'h1' y #27'h'#1 y de ninguna me ha funcionado, realmente no se que pasa.

Saludos,
Leonel
Responder Con Cita
  #9  
Antiguo 19-03-2007
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Poder: 21
AzidRain Va camino a la fama
haciendo click Aquí llegas a un post que puse hace unos días con un componente muy simple para imprimir en matriz de punto, ya incluye lo necesario para negrita, subrayada, doble ancho o comprimida, asi como fijar el tamaño de la hoja, posicionar el cursor y saltos de página. No soy el autor pero me ha servido muy bien además de que es bastante simple y puedes modificarlo a tu gusto.
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita
  #10  
Antiguo 21-03-2007
leonelpereda leonelpereda is offline
Miembro
 
Registrado: may 2006
Posts: 11
Poder: 0
leonelpereda Va por buen camino
Hola

Cita:
Empezado por AzidRain
haciendo click Aquí llegas a un post que puse hace unos días con un componente muy simple para imprimir en matriz de punto, ya incluye lo necesario para negrita, subrayada, doble ancho o comprimida, asi como fijar el tamaño de la hoja, posicionar el cursor y saltos de página. No soy el autor pero me ha servido muy bien además de que es bastante simple y puedes modificarlo a tu gusto.
Muchas gracias, tu ejemplo esta muy bien solo que no hace lo que necesito, "poner double height"

Saludos,
Leonel
Responder Con Cita
  #11  
Antiguo 22-03-2007
Avatar de PabloTech
PabloTech PabloTech is offline
Miembro
 
Registrado: ene 2007
Ubicación: Tucumán, Argentina
Posts: 82
Poder: 18
PabloTech Va por buen camino
Cita:
Empezado por Ricsato
Hola, tengo los codigos de la impresora,
¿Tengo un problema similar. Podrías compartir los códigos conmigo?
Mi e-mail: pblmdn@hotmail.com
Gracias...
__________________
Cita:
Cuando respetes al ilustrado y al ignorante, al rico y al pobre, al bello y al feo, estarás muy cerca de la sabiduría, que trasciende lo aparente.

E. Rharo
Responder Con Cita
  #12  
Antiguo 23-03-2007
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Poder: 21
AzidRain Va camino a la fama
Mi estimado leonel, el componente que te pase efectivamente no tiene el doubleheight pero creo que esta mas que claro como modificarlo ya que solo es cuestión de mover unos cuantos códigos. El código se explica por si solo, los códigos solo es cosa de buscar el google y listo recordemos que ESC es #27 en Delphi.
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita
  #13  
Antiguo 23-03-2007
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Yo tengo una Star y si me funciona el caracter #14 pero con una Epson TM-U220 no me funciona, ya baje todos los manuales posibles de la Epson y no encuentro algo relacionado con los caracteres, señalan unos Font11, Font22, etc. pero no indican los caracteres para manipular el tamaño de letra, ya he investigado en otros medios y me indican que tengo que usar el #14 para la epson que ese caracter funciona para todas las miniprinter, pero veo que en mi caso no funciona
__________________
"Hemos aprendido a volar como los Pájaros, y a nadar como los Peces, y todavía No aprendemos a vivir como Hermanos". Martin Luther King
Responder Con Cita
  #14  
Antiguo 23-03-2007
leonelpereda leonelpereda is offline
Miembro
 
Registrado: may 2006
Posts: 11
Poder: 0
leonelpereda Va por buen camino
Cita:
Empezado por AzidRain
Mi estimado leonel, el componente que te pase efectivamente no tiene el doubleheight pero creo que esta mas que claro como modificarlo ya que solo es cuestión de mover unos cuantos códigos. El código se explica por si solo, los códigos solo es cosa de buscar el google y listo recordemos que ESC es #27 en Delphi.
Hola,

De hecho estuve revisando y el componente hace algo muy similar a lo que estoy haciendo, que es:

Estos codigos son para una STAR SP200
var Lst : TextFile;
begin
AssignFile(Lst,'LPT1');
Rewrite(Lst);
Write(Lst, #27'W1'#27'h1');
Write(Lst, 'Texto ancho y alto');
CloseFile(Lst);
end;
solo que no cambia el alto de la letra solo el ancho como si no fuera valido el cambio de alto o si fuera necesario algun comando previo a ese.

Tambien trate asi
var Lst : TextFile;
begin
AssignFile(Lst,'LPT1');
Rewrite(Lst);
Write(Lst, #27'h1');
Write(Lst, 'Texto alto');
CloseFile(Lst);
end;
y nada , y no veo cual es el problema,

Gracias,
Leonel
Responder Con Cita
  #15  
Antiguo 23-03-2007
Avatar de PabloTech
PabloTech PabloTech is offline
Miembro
 
Registrado: ene 2007
Ubicación: Tucumán, Argentina
Posts: 82
Poder: 18
PabloTech Va por buen camino
Me parece...

No soy un experto; pero revisando aquí, solo aparecen dos tamaños de caracteres en esa impresora. Son el 7x7 y 7x9. No hay más.

Suerte.
__________________
Cita:
Cuando respetes al ilustrado y al ignorante, al rico y al pobre, al bello y al feo, estarás muy cerca de la sabiduría, que trasciende lo aparente.

E. Rharo
Responder Con Cita
  #16  
Antiguo 26-03-2007
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Poder: 21
AzidRain Va camino a la fama
El doubleheight no esta soportado por todas las impresoras, me parece que las epson no lo hacen. Recordemos que hay dos estandares para impresoras matriciales el ESC de Epson y el IBM Proprinter, este último más extendido. En IBM PP si hay doubleheight...aqui te dejo unos links a codigos de control varios:

Star Micronics
Manual Epson ESC/P
__________________
AKA "El animalito" ||Cordobés a mucha honra||
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 04:22:02.


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