Code:
#include <vcl.h>
#pragma hdrstop
#include "Unit9.h"
#include "ShellApi.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "QRPrntr"
#pragma link "QuickRpt"
#pragma link "QRCtrls"
#pragma resource "*.dfm"
TForm9 *Form9;
//---------------------------------------------------------------------------
__fastcall TForm9::TForm9(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm9::Button2Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm9::QuickRep1Preview(TObject *Sender)
{
QRPreview1->QRPrinter= (dynamic_cast<TQRPrinter*>(Sender));
}
//---------------------------------------------------------------------------
void __fastcall TForm9::Button1Click(TObject *Sender)
{
QRDBText1->DataField="Obrazovanie";
QuickRep1->Preview() ;
}
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit9.h"
#include "ShellApi.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "QRPrntr"
#pragma link "QuickRpt"
#pragma link "QRCtrls"
#pragma resource "*.dfm"
TForm9 *Form9;
//---------------------------------------------------------------------------
__fastcall TForm9::TForm9(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm9::Button2Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm9::QuickRep1Preview(TObject *Sender)
{
QRPreview1->QRPrinter= (dynamic_cast<TQRPrinter*>(Sender));
}
//---------------------------------------------------------------------------
void __fastcall TForm9::Button1Click(TObject *Sender)
{
QRDBText1->DataField="Obrazovanie";
QuickRep1->Preview() ;
}
//---------------------------------------------------------------------------
Kude tumbe i tri bandere