FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
comandos de impresion
en otro hilo hemos estado tratando de hacer el manejo de las secuencias de escape de las impresoras, yo trabajo con la tm-t90 de epson y ya encontre el comando para cortar el papel es #27 +#105
y me funciono definiendolo como un constante como se ve abajo const pNewLn = #10 +#13; // Salto de linea pCuton = #27 +#105; //Corte #27 +#105 begin PWrite(pNewLn ); PWrite(pNewLn ); PWrite(' hola como estas'); PWrite(pNewLn ); PWrite(pNewLn ); PWrite(' Preparando Prueba de Corte'); PWrite(pNewLn ); PWrite(pCuton); end; lo que ahora quiero es poder manejarlo como una variable que en un campo se capture esta secuencia y se ejecute, pero no funciona asi con uan variable, asi: const pNewLn = #10 +#13; // Salto de linea Var Varcut :String; Begin Varcut := edit1.Text; PWrite(' Preparando Prueba de Corte'); PWrite(pNewLn ); PWrite(Varcut); la impresora me imprime el comando en vez de ejecutarlo, alguien podria decirme porque y como lo soluciono, el procedimiento es el que se publico en otro hilo y la presento a continuacion: Procedure TForm1.PWrite(s:String); var PT :Integer; P :Pchar; Begin PT := FileOpen('lpt1',fmOpenWrite ); // Abrimos la impresora como un archivo P := PChar( s ); //convertimos la cadena a un PChar FileWrite(PT,P^,length( s )); //escribimos a la impresora FileClose(PT);//cerrar el archivo de la impresora end; de antemano gracias por su tiempo y disculpen si la pregunta es muy tonta |
#2
|
||||
|
||||
Cita:
O lo escribes directamente en el edit. Porque puede que no estés introduciendo lo que piensas. Para comprobarlo utiliza algo como esto para saber exactamente que caracteres son:
|
#3
|
|||
|
|||
si, estoy tecleando en el Edit
si obiamente estoy introducuiendo en el EDIT #27 +#105, el problema es cuando llamo, no lo ejecuta mas bien lo imprime
|
#4
|
||||
|
||||
Sigo dándole vueltas al asunto, en el edit ¿estas introduciendo la cadena de texto '#27+#105'?, es decir la cadena de texto tal cual. Porque así el resultado es una cadena de 8 caracteres y no los 2 que tu necesitas para hacer el corte. Se me ocurre lo siguiente para que puedas introducir los caracteres especiales como el 27:
De este modo, por ejemplo, si queremos imprimir esto: Código:
Hola mundo (Cortar) Código:
Hola mundo%0A%0D%1B%69 |
#5
|
||||
|
||||
Esto si te funcionará, lo que estás haciendo como te dice Seoane es: '#10#13' y en realidad lo que tiene que contener son los códigos de alimentación de línea: 10 y retorno de carro 13. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
messenger por comandos | Cosgaya | Varios | 0 | 01-02-2006 12:58:17 |
Limitacion con Interbase y PHP en los comandos SQL | ronalg | PHP | 0 | 31-07-2005 17:01:30 |
shell para comandos del dos | sarga | API de Windows | 1 | 16-04-2004 03:55:33 |
Ejecutar comandos del DOS? | Carlos Arevalo | Varios | 3 | 12-11-2003 07:50:41 |
reconocer todos los comandos de SQL | M@rcos | SQL | 3 | 30-06-2003 12:20:02 |
|