FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Consulta sobre TPrinter
Posts: 196
Joined: Fri May 15, 2009 01:25 AM
Consulta sobre TPrinter
Posted: Thu Jun 16, 2011 02:54 PM

Amigos del foro

Estoy utilizando la instruccion

oPrn:SetCopies( 2 ), estoy imprimiendo un pedido y necesito poner en la primera impresion
ORIGINAL y COPIA en la segunda

Si alguien pudiera ayudarme se los agradecería mucho

Saludos

Juan Arroyo
México
FWH 7.12 VERCE 5.3 xHarbour 1.1.0
juan_arroyo_t@hotmail.com
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: Consulta sobre TPrinter
Posted: Thu Jun 16, 2011 04:04 PM
Juan,

A mi modo de ver hay dos posibilidades.

1ª) Repetir 2 veces la misma impresion.
FOR nI:= 1 TO nCopias
ImpresionDocumento()
NEXT

Ventajas: 1. permite que ImpresionDocumento() tenga también salida a Pdf, Word si la rutina de impresion que tengas lo permite.
2. Permite que ademas de imprimir copia, puedas variar todo lo que quieras entre el original y las copias, de manera
que algunos campos saldrian o no segun original o copia
Desventajas: Doble (o mas, segun copias) vuelta: lento.


2ª) Hacer un ImportWmf() de los wmf creados y pintarle "copia".
Esta técnica la aprendí de TImprime/UtilPrn de TheFull
Ventajas: Es rapido
Desventajas: 1. solo permitido para impresion por impresora, valga la repugnancia.
2. sólo para imprimir "copia" y poco más, porque no hay flujo del programa en la creacion.

No sé si te he ayudado o te he liado.
Saludos
Posts: 196
Joined: Fri May 15, 2009 01:25 AM
Re: Consulta sobre TPrinter (SOLUCIONADO)
Posted: Fri Jun 17, 2011 02:58 PM

hmpaquito

Muchas gracias lo hice con el FOR - NEXT y funcionó perfecto

Saludos

Juan Arroyo
México
FWH 7.12 VERCE 5.3 xHarbour 1.1.0
juan_arroyo_t@hotmail.com

Continue the discussion