Página 1 de 1

Problema con uso de TCanvas

Publicado: Mar Dic 21, 2010 10:03 am
por perolero
Hola:
Utilizo las clase TCanvas para la impresión de documentos tipo factura que requieren el dibujo de un formulario al estilo rectangulo, lineas, etc:
WITH OBJECT Printer:oCanvas
:Rectangle({200,50,1900,950})
END WITH
Cuando previsualizo la impresión, aparece el rectangulo perfectamente pintado, pero cuando lanzo la impresión sobre el papel no aparece nada. He observado en ejemplo DataControlsDbfData6 en la opción facturas, que le pasa lo mismo, el formulario de la factura aparece perfectamente pintado en el Preview pero al lanzarlo al papel sólo aparecen los datos de la factura pero no el formulario.
Alguien puede decirme algo.
Gracias.

Problema con uso de TCanvas

Publicado: Vie Dic 24, 2010 3:00 pm
por jlalin
Emilio,
¿has probado indicando expresamente el principio/fin de documento?
WITH OBJECT Printer:oCanvas
:StartDoc(...)
:Rectangle({200,50,1900,950})
:EndDoc()
END WITH
Saludos,
José Lalí­n