Ver Mensaje Individual
  #3  
Antiguo 03-12-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por marcoszorrilla
Pues, no se puede
Bueno, bueno, siempre hay maneras de hacer las cosas. Que sean chapuzas ya es otra cuestión

La vista preliminar de QuickReport se presenta en una ventana de tipo TQRStandardPreview que afortunadamente aparece en la lista Screen.Forms de manera que podemos acceder directamente a ella en código recorriendo Screen.Forms hasta encontrar una cuyo ClassName sea 'TQRStandardPreview'

Una vez que tenemos una referencia a esta forma podemos recorrer la lista de sus componentes (Components) e inhabilitar las que nos plazca.

Para saber cuál nos place podemos examinar la propiedad Name y/o ClassName de cada componente.

El único detalle es encontrar el momento adecuado para examinar Screen.Forms. Intenté con el evento OnDeactivate del formulario desde donde llamo al preview y funciona en el caso no modal pero falla en el modal.

Finalmente escribí directamente un manejador para el mensaje WM_ACTIVATE que se recibe tanto cuando se activa la ventana como cuando se desactiva.

// Saludos
Responder Con Cita