Vista preliminar

[Majo]

Un saludo a todos..

Necesito imprimir el contenido de una form... eso lo logro con Form1.Print.

Resulta que mi form es tan grande que tiene un rango en su scroll horizontal y vertical de 20000. Me gustaría saber si hay alguna manera desplegar una ventana de "Vista previa" para poder observar si el área que se va a imprimir es la deseada.

El mismo problema se me presenta con un objeto TChart.


Cómo hacer una vista previa para la Form y cómo hacerla para un TChart? Se puede Hacer?


Gracias de antemano....

[roman]

Se me ocurre esto, a ver si te sirve.

En un formulario aparte colocas un TQuickReport y un TQRImage1 con AutoSize = true. Cuando quieras ver el "Preview" del primer formulario cargas la imagen en el QRImage y muestras el segundo formulario:

Form2.QRImage1.Picture.Bitmap := GetFormImage;
Form2.QRImage1.Show;

// Saludos