Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-12-2009
manuweb manuweb is offline
Miembro
 
Registrado: oct 2005
Posts: 19
Poder: 0
manuweb Va por buen camino
Imprimir caracteres de control

Hola forer@s.

Tengo un programa TPV (en PHP) que imprime sin problema en la impresora de tikets. Para la apertura de cajón (conectado a COM1) usaba un ejecutable escrito en Delphi en el que escribía directamente al puerto usando :


Código Delphi [-]
Cadena:String;
 
//
 
Cadena := #27#112#0#60#240#13#10; // los codigos del cajón



Ahora lo necesito para un cajón conectado directamente a la impresora y quería hacerlo similar, pero con un valor almacenado en un ini (para poder cambiar si cambia el modelo de impresora):


Código Delphi [-]
Cadena:String;
 
//
Cadena := MiFichero.ReadString ('Cajon','Apertura','desconocida');

No consigo que abra el cajón, escribe directamente el valor puesto en el ini.

Código Delphi [-]
Cadena := #10; // funciona, avanza linea en blanco
Cadena := '#10';// NO FUNCIONA, imprime #10
Es como si en lugar de imprimir lo que quiero el lo almacena entre comillado.

¿Como debo definir la variable Cadena para que funcione? ya que:



Gracias

Última edición por manuweb fecha: 04-12-2009 a las 17:55:43.
Responder Con Cita
  #2  
Antiguo 05-12-2009
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Pues asi:
Código Delphi [-]
Cadena := #27#112#0#60#240#13#10;
O tambien su equivalente en ASCII
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita
  #3  
Antiguo 05-12-2009
manuweb manuweb is offline
Miembro
 
Registrado: oct 2005
Posts: 19
Poder: 0
manuweb Va por buen camino
Gracias pero:

Código Delphi [-]
Cadena := #27#112#0#60#240#13#10;

no da el mismo resultado que esto:

Código Delphi [-]
Cadena := '#27#112#0#60#240#13#10';

La única solución que veo por el momento es crear un ejecutable por cada tipo de cajón. Ya que no puedo leer Cadena ni desde un ini ni desde una Base de datos ni desde ningún sitio.

Gracias igualmente.
Responder Con Cita
  #4  
Antiguo 05-12-2009
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por manuweb Ver Mensaje
Gracias pero:

Código Delphi [-]Cadena := #27#112#0#60#240#13#10;


no da el mismo resultado que esto:

Código Delphi [-]Cadena := '#27#112#0#60#240#13#10';


La única solución que veo por el momento es crear un ejecutable por cada tipo de cajón. Ya que no puedo leer Cadena ni desde un ini ni desde una Base de datos ni desde ningún sitio.

Gracias igualmente.
Cómo? no entiendo:
desde luego que esto:
Código Delphi [-]
Cadena := #27#112#0#60#240#13#10;
NO ES LO MISMO que esto
Código Delphi [-]
Cadena := '#27#112#0#60#240#13#10';
El uno es una cadena de secuencias de Caracteres AsCII y el el otro yo diria es una palabra.
No entiendo tu Objeción
Por otro lado podrias tranquilamente guardar la secuencia de número ASCII en tu archivo .INI y al leerlo podria utilizar la funcion CHR de Delphi para obtener el equivalente en ASCII.
Por ejemplo:
chr(65) me devuelve 'A';
chr(32) me devuelve el Espacio ' ';
etc,etc,etc.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita
  #5  
Antiguo 05-12-2009
manuweb manuweb is offline
Miembro
 
Registrado: oct 2005
Posts: 19
Poder: 0
manuweb Va por buen camino
Cita:
Por otro lado podrias tranquilamente guardar la secuencia de número ASCII en tu archivo .INI y al leerlo podria utilizar la funcion CHR de Delphi para obtener el equivalente en ASCII.
Por ejemplo:
chr(65) me devuelve 'A';
chr(32) me devuelve el Espacio ' ';
etc,etc,etc.
Saludos...
Podría almacenar los códigos mumericos 27,112,0 (#27#112#0) como una cadena '27,112,0' y recorrer quitando las comas para luego imprimir directamente chr(27)+chr(112)+chr(0). Voy a probar.

Gracias
Responder Con Cita
  #6  
Antiguo 08-12-2009
Croatians Croatians is offline
Registrado
 
Registrado: dic 2009
Posts: 2
Poder: 0
Croatians Va por buen camino
Imprimir caracteres de control

tengo que armar un programita, que va a cargar unos datos, y luego los va a imprimir en una hoja. el tema es que la posicion se tiene que poder especificar con bastante precision.muy probable me den los datos en milimetros. no estoy seguro de esto.alguna recomendacion?gracias
Responder Con Cita
  #7  
Antiguo 08-12-2009
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por Croatians Ver Mensaje
tengo que armar un programita, que va a cargar unos datos, y luego los va a imprimir en una hoja. el tema es que la posicion se tiene que poder especificar con bastante precision.muy probable me den los datos en milimetros. no estoy seguro de esto.alguna recomendacion?gracias
Pues deberias usar un reporteador como por ejemplo QuickReport,Rave Report,Cristal Report,Fast Report,etc,etc,etc, que seguro te van a fascilitar la vida..
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 10-12-2009 a las 22:32:04.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
caracteres de control anubis Varios 3 03-12-2009 21:48:02
Imprimir los caracteres ≤ y ≥ QuarkBcn Impresión 3 16-06-2007 12:12:54
Ayuda con Caracteres especiales a la hora de Imprimir JerS Varios 3 02-06-2005 00:58:41
Caracteres raros al imprimir reporte joserobertorc Impresión 0 07-01-2005 22:22:18
Control que crea control craven OOP 5 07-06-2003 03:23:13


La franja horaria es GMT +2. Ahora son las 02:10:45.


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