preview.~cpp

来自「用C++ Builder编写的个人财务管理软件」· ~CPP 代码 · 共 116 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Preview.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TPreviewForm *PreviewForm;
//---------------------------------------------------------------------------
__fastcall TPreviewForm::TPreviewForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonFullClick(TObject *Sender)
{
    QRPreview->ZoomToFit();
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonActualClick(TObject *Sender)
{
    QRPreview->Zoom=100;
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonPageWidthClick(TObject *Sender)
{
    QRPreview->ZoomToWidth();
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonPrinterSetupClick(TObject *Sender)
{
    QRPreview->QRPrinter->PrintSetup();
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonPrintClick(TObject *Sender)
{
    QRPreview->QRPrinter->Print();
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonCloseClick(TObject *Sender)
{
    Close();
}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::ButtonFirstClick(TObject *Sender)
{
 try{
  QRPreview->PageNumber = 1;
  UpdateStatusBar();
  }
 catch(...)
 {
 }
 

}
//---------------------------------------------------------------------------
void __fastcall TPreviewForm::UpdateStatusBar()
{
   StatusBarPreview->Panels->Items[1]->Text = "第" + IntToStr(QRPreview->PageNumber)+ " 页/总共"+IntToStr(QRPreview->QRPrinter->PageCount ) + "页";
}
//---------------------------------------------------------------------------

void __fastcall TPreviewForm::ButtonNextClick(TObject *Sender)
{
  try{
  QRPreview->PageNumber ++;
  if ( QRPreview->PageNumber > QRPreview->QRPrinter->PageCount )
    QRPreview->PageNumber = 1 ;

  UpdateStatusBar();
 }
 catch(...){} 

}
//---------------------------------------------------------------------------

void __fastcall TPreviewForm::ButtonTailClick(TObject *Sender)
{
  QRPreview->PageNumber = QRPreview->QRPrinter->PageCount ;

  UpdateStatusBar();

}
//---------------------------------------------------------------------------

void __fastcall TPreviewForm::ButtonPrivClick(TObject *Sender)
{
  QRPreview->PageNumber -- ;
  if ( QRPreview->PageNumber < 1 )
    QRPreview->PageNumber = 1 ;

  UpdateStatusBar();

}
//---------------------------------------------------------------------------








void __fastcall TPreviewForm::FormShow(TObject *Sender)
{
 QRPreview->PageNumber = 1;
//StatusBarPreview->Panels->Items[1]->Text = "第" + IntToStr(QRPreview->PageNumber)+ " 页/总共"+IntToStr(QRPreview->QRPrinter->PageCount ) + "页";
       
}
//---------------------------------------------------------------------------