Ver Mensaje Individual
  #5 (permalink)  
Antiguo 04/02/2003, 16:36
pablorobayo
 
Fecha de Ingreso: marzo-2002
Ubicación: Quito
Mensajes: 99
Antigüedad: 22 años, 1 mes
Puntos: 0
Gustavo Azcona

Nuevamente gracias, dado el poco tiempo que tengo para desarrollo, me inclino por la segunda opción. Ahora, tengo un formulario "frmPreview" en el que coloqué un picture con la imagen del formulario y sobre el unos labels que colocan la información correspondiente.

Mi dificultad radica en imprimir este formulario con el tamaño adecuado, hice unas pruebas de impresión modificando un programa que encontré en www.portalvb.com (logré imprimir, el gif con que probé sale muy desproporcionado):


Dim lAlto As Long
Dim lAncho As Long

With Printer
.ScaleMode = 1
'Propiedades del tamaño del alto y ancho de la impresora
lAlto = .ScaleHeight
lAncho = .ScaleWidth
End With

lAlto = lAlto \ 6 - frmImprimir.pctRequisitos.ScaleHeight \ 2

lAncho = lAncho \ 6 - Imprimir.pctRequisitos.ScaleWidth \ 4

Printer.EndDoc


Es correcto el código que usé?
__________________
Pablo Robayo