FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Como usar los escapes de una impresora por código
Como se añaden escapes de una impresora por código con el delphi 5 para realizar una función determinada de una impresora matricial,
pondré un ejemplo que viene en el manual de una impresora determinada en la lista de comandos de control: Código de control: <ESC> r n Código Hexadecimal: 1B72n Función: Selecciona el color de la impresión En este caso concreto es para seleccionar si el color se quiere poner en rojo o negro. ¿Cómo hago referencia a estos datos por código? ¿alguna idea de como hacerlo? Muchas gracias |
#2
|
|||
|
|||
Mira, yo resolvi algo similar (tipos de letras, tamaños y font) para las impresoras de matriz de la siguiente manera.
Guarde dentro de un archivo las cadenas de escape, en el archivo puse un formato como el siguiente: NEGRITA=Esc .... CONDENSADO=Esc... y asi defini todo los codigos que necesite. Luego desde el Delphi, levanto esta tabla, las cargo en variables, y cuando voy a imprimir las uso dentro del stroing que imprimo, por ejemplo 'Lo que sigue sale en negritas'+VAR-NEGRITA+'esto sale en negrita' Espero que te sirva y haber sido claro. sino avisa suerte miguel |
#3
|
|||
|
|||
¿alguien sabe cómo se introduce por código el escape para modificar el color de la tinta de una impresora de tickets, matricial?
Gracias |
#4
|
||||
|
||||
Var
cBold:String; cBoldOff:String; begin cBold:=CHR(27)+CHR(71) cBoldOff:=CHR(27)+CHR(72) Write(cBold+' Esto va en negrita'+cBoldOff); end; En tu caso quedaría para color rojo: Esc=1BH = 27d r =72H=114d En tu caso quedaría para color negro: Esc=1BH = 27d n =6EH=110d cRojo:=Chr(27)+Chr(114). cNegro:=Chr(27)+Chr(110). Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
Última edición por marcoszorrilla fecha: 10-11-2003 a las 15:08:05. |
|
|
|