FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#4
|
|||
|
|||
Con este código me daba un access violation. Es uno de los hilos que me comentabas, con el otro no me he aclarado.
procedure Tform1.Button1OnClick(sende:Tobject); Var i:Integer; archivo:TextFile; cadena:string; begin Assign(archivo,'COM1'); reset(archivo); // esta cadena es la misma que se recomienda en el manual de la impresora para lenguaje cobol cadena:=chr$(27)+chr$(99)+chr$(4+chr$(4); writeln(archivo,cadena); writeln('Esta es una prueba de impresión de la función Slip'); end; Al final he utilizado la opción "tprinter" del delphi y he impreso bien. Qué problema tengo ahora?. Para abrir el portamonedas tengo que mandarle un código hexadecimal a la impresora (<ESC>pmt1t2). yo utilizo #$1B + ... El problema es que según recuerdo $1B es el escape pero la impresora recibe el código 2E + ... Puede ser que cómo no tengo nada en el config.sys no esté preparada la página de códigos?????? Abriré algún día el portamonedassss????. Por lo menos he conseguido imprimir. |
|
|
|