maximizar y zom to with para mi quickreport

[ingabraham]

hola tengo un form y alli varios reportes,
quiero que al momento de abrir mi report me salga maximizado y con el zom to width.


tengo
quickreport 4.06 for delphi 7

[ecfisa]

Código Delphi [-]
  with TfrmQRShow.Create(nil) do
  try
    QuickRep1.Width := Width;
    QRPreview1.Align:= alClient;
    QRPreview1.ZoomToWidth;
    ShowModal;
  finally
    Free;
  end;

[ingabraham]

asi visualizo:

Código Delphi [-]


           Reportes.RFactura.PreviewModal;
           Reportes.Free;
           Refresh;

[ingabraham]

Empezado por ecfisa

Código Delphi [-]
  with TfrmQRShow.Create(nil) do
  try
    QuickRep1.Width := Width;
    QRPreview1.Align:= alClient;
    QRPreview1.ZoomToWidth;
    ShowModal;
  finally
    Free;
  end;

gracias, pero no entiendo que es
QRPreview1 y QRPreview1 , son dos qreport

[ecfisa]

Te adjunto un ejemplo para que puedas probarlo y revisarlo.

[xorc]

Empezado por ecfisa

Te adjunto un ejemplo para que puedas probarlo y revisarlo.

No funciona el archivo zip, sale error al intentar abrirlo. POr favor explicar el codigo, no se que quiere decir TfrmQRShow y otras variables. Gracias.
Veo que es de hace muchos años este hilo pero a veces me ha salido una fecha inconsistente en los hilos, supongo que con intentar no se pierde nada

[ecfisa]

Hola xorc.

Intentá abrirlo o descargarlo con Mozilla Firefox. Varios miembros han tenido problemas al intentar abrir/descargar archivos con algunas versiones de IE.

En este caso pude realizar ambas acciones, tanto con Mozilla Firefox 12 como con Internet Explorer 9, es decir que los navegadores no me estan dando inconvenientes. Pero si aún continuas con dificultades, avisame y vemos la manera de enviártelo.

El código corresponde a la creación de un form y ajustes de valores de propiedades de componentes, sobre él, te comento el tipo de las variables usadas:

Código Delphi [-]
  with TfrmQRShow.Create(nil) do  // TfrmQRShow = class(TForm)
  try
    QuickRep1.Width := Width;     // QuickRep1 : TQuickRep
    QRPreview1.Align:= alClient;  // QRPreview1: TQRPreview
    QRPreview1.ZoomToWidth;       
    ShowModal;                    // (frmQRShow)  
  finally
    Free;
  end;

Un saludo.