Ver Mensaje Individual
  #3  
Antiguo 28-07-2017
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Coincido totalmente con la sugerencia de Caminante, un ejemplo programático simple:
Código PHP:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  
cSpinEditZoomValue->Value 100;
  
Panel1->Align     alTop;
  
QRPreview1->Align alClient;
}

// QuickRep OnPreview
void __fastcall TForm1::QuickRep1Preview(TObject *Sender)
{
  
QRPreview1->QRPrinter static_cast<TQRPrinter*>(Sender);
  
QRPreview1->Show();
}

// Preview
void __fastcall TForm1::btnPreviewClick(TObject *Sender)
{
  
QuickRep1->Preview();
}

// To fit
void __fastcall TForm1::btnZoomToFitClick(TObject *Sender)
{
  
QRPreview1->ZoomState qrZoomToFit;
  
QRPreview1->ZoomToFit();
}

// To width
void __fastcall TForm1::btnZoomToWidthClick(TObject *Sender)
{
  
QRPreview1->ZoomState qrZoomToWidth;
  
QRPreview1->ZoomToWidth();
}

// Custom
void __fastcall TForm1::cSpinEditZoomValueChange(TObject *Sender)
{
  
QRPreview1->ZoomState qrZoomOther;
  
QRPreview1->Zoom      cSpinEditZoomValue->Value;

Muestra:


Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 28-07-2017 a las 17:55:18.
Responder Con Cita