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 22-12-2010
ASUNCION ASUNCION is offline
Miembro
 
Registrado: nov 2010
Posts: 34
Poder: 0
ASUNCION Va por buen camino
Imprimir por Puerto Com1

Saludos para todos,

Tengo una Impresora que se comunica a la computadora por el com1,
Estoy utilizando el componente TComport,

con este codigo puedo probar y me envia esta informacion
ComPort.Open;
ComPort.WriteStr('ESTO ES UN PRUEBA');
ComPort.Close;

Hice un programa en delphi 7 que me genera una secuencia de numeros y lo almacena un una tabla, por ejemplo del 1 al 10,000, cada numero tengo que imprimir en una hoja 8 1/2 * 11 en dos lugares.

como hago para preparar todo el conjunto de datos y enviarlos a la impresora
y que me caigan en el lugar que quiero?. puedo tener un preview antes de enviarlo?
Responder Con Cita
  #2  
Antiguo 23-12-2010
Avatar de defcon1_es
defcon1_es defcon1_es is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuenca - España
Posts: 533
Poder: 21
defcon1_es Va por buen camino
Hola.

Tienes que contar los caracteres que caben en una línea del papel, y crearte las cadenas de texto que mandas a imprimir con el formato que tu quieres,
es decir, si en cada línea caben 110 caracteres (por ejemplo, ahora no recuerdo cuantos caben en ese formato de papel)
debes enviar una cadena de texto con lo siguiente:

<Nº Caracteres margen izquierdo> + <Nº Caracteres primera etiqueta> + <Nº Caracteres separacion entre etiquetas> + <Nº Caracteres segunda etiqueta>

Código Delphi [-]
var AuxCadena: String;
....
ComPort.Open;
AuxCadena := '  '+TextoEtiqueta1+'                             '+TextoEtiqueta2;
ComPort.WriteStr(AuxCadena);
ComPort.Close;

PD: Al estar usando la impresión directa, no puedes previsualizar lo que mandas a imprimir, pero si puedes guardar en un txt todas las cadenas de texto que mandas a imprimir, y lo abres con el bloc de notas, por ejemplo.
__________________
Progress Openedge
https://abevoelker.com/progress_open...dered_harmful/


Delphi forever...

Última edición por defcon1_es fecha: 23-12-2010 a las 18:30:46.
Responder Con Cita
  #3  
Antiguo 23-12-2010
sistem sistem is offline
Registrado
NULL
 
Registrado: dic 2010
Ubicación: Puebla,Mexico
Posts: 2
Poder: 0
sistem Va por buen camino
por que no usar QuickReport

¿has pensado en usar el QuickReport?
ya esta integrado, es facil y ya tiene muchas cosas predeterminadas
Responder Con Cita
  #4  
Antiguo 24-12-2010
manuc manuc is offline
Miembro
 
Registrado: abr 2010
Posts: 165
Poder: 15
manuc Va por buen camino
Hola,

Aunque la impresora se conecte al Com1: ¿la instalas bajo windows con un driver, aunque sea con Generica solo texto?

Al instalarla como Generica sólo Texto, se puede aprovechar la velocidad de impresión y se simplifica los métodos para imprimir desde Delphi.

Un saludo.
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Puerto COM1 y bascula digital jjha79 Providers 13 05-05-2011 17:18:24
ayuda codigo para leer el puerto com1 happy-word Varios 1 22-08-2008 17:41:44
Envio de datos al puerto serie COM1 Niko Varios 5 15-03-2005 18:38:21
Anviar Archivos por puerto COM1... Sinaloense API de Windows 1 14-01-2005 19:52:10
Parámetros puerto COM1 Tecnic2 OOP 0 05-11-2004 18:33:00


La franja horaria es GMT +2. Ahora son las 18:24:20.


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