Menambahkan Quick Report
Report merupakan komponen utama untuk mendesain tampilan laporan
Menggunakan QuickReport untuk printable(format sesuai cetakan via printer)
1. Buka form baru
2. Tempelkan komponen Quick Rept
3. Tambahkan komponen Database,Query pada form tersebut.
4. Klik komponen QRBand dengan Property BandType : rbTitle.Letakkan di jendela QuickRep.QRBand-rbTitle ini digunakan sbg judul laporan.
5. Tempatkan QR Label pada QRBand-rbTitle.
6. Klik komponen QRBand dengan Property BandType : rbColumnHeader (digunakan untuk menempatkan judul kolom).kemudian tempatkan komponen QRLabel sesuai dengan jumlah kolom yg diinginkan dan isi Caption dari Qrlabel sesuai judul kolom masing-masing.
7. Klik komponen QRBand dengan Property BandType : rbDetail (digunakan untuk menempatkan data yang berasal dari database)
8. Tempatkan Button untuk tombol Preview dan Print, kemudian isi properti seperti dibawah ini
Contoh form report
Komponen | Property | Event | keterangan | |||||
Database | Alias name : SI Perpustakaan Database Name: SI Perpustakaan Connected: true Login Prompt : false Name : Database1 (default) | Digunakan untuk koneksi ke database | ||||||
Query | Database name : SI Perpustakaan Active : true Name : Query1 (default) | Untuk menuliskan printah SQL | ||||||
DataSource | Dataset: Query1 Name : DataSource1 (default) | Untuk menghubungkan ke Query dengan DBGrid | ||||||
QuickRep | Data Source : DataSource1 | Untuk menampilkan hasil query dalam bentuk tabulasi | ||||||
QRLabel1 | Caption : DAFTAR buku | Memberi judull aporan | ||||||
QRLabel2 | Caption : Nama_buku | Memberi judul kolom | ||||||
QRLabel3 | Caption : id_buku | Memberi judul kolom | ||||||
QRLlabel4 | Caption : penulis | Memberi judul kolom | ||||||
QRDBText1 | Dataset: Query1 DataField: nama | Agar kolom diisi data dari field nama | ||||||
QRDBText2 | Dataset: Query1 DataField: penerbit | Agar kolom diisi data dari field penerbit | ||||||
QRDBText3 | Dataset: Query1 DataField: judul | Agar kolom diisi data dari field judul | ||||||
Button1 | Caption : Preview | Event-OnClick TForm1::Button1Click(TObject *Sender) { QuickRep1->Preview(); } | Hasil tercetak di layar | |||||
Button2 | Caption : Print | Event-OnClick TForm1::Button1Click(TObject *Sender) { QuickRep1->Preview(); } | Agar hasil tersetak di printer | |||||
Form1 | Event-OnCreate TForm1::FormCreate(TObject *Sender) { QuickRep1->Visible=false; } | Untuk menyembunyikan format Quick Report, shg yang nampak hanya form dialog |