membuat laporan dengan quick report delphi

Monday, November 19, 2012

sebelumnya kita sudah belajar cara menginstal komponen quick report, bagi yang belum membaca silahkan baca artikel, cara instal quick report di delphi 7. sekarang kita akan membuat laporan dengan menggunakan komponen quick report. berikut langkah-langkahnya.

1. Membuat Quick Report
Pertama kali kita buat tampilan baru QReport melalui File - New - Report. Jika Anda tidak menemui menu report maka pilih menu File - New - Other - New - Report. Kemudian kita buat tampilan laporan yang kita inginkan. Kali ini penulis ingin menuliskan judul dari laporan, lambang, daftar mahasiswa, jumlah mahasiswa, tanggal, jam, serta nomor halaman, maka diperlukan komponen sebagai berikut:
- QRBand, untuk memberikan batasan - batasan sesuai dengan jenis penulisan.
- QRLabel, untuk menampilkan tulisan yang kita inginkan
- QRDBtext, untuk menampilkan data field yang kita inginkan
- QRExpr, untuk melakukan mengolah data field database dengan operasi matematika, statistic , tanggal dan waktu,logical, information dan yang lainnya.
- QRSysData, untuk menampilkan tanggal dan jam (qrstime,qrsdate,qrsdatetime), jumlah record (qrsdetailcount), Nomor urut record (qrsdetailno), nomor halaman (qrspagenumber).
- QRShape, untuk mengambar bentuk - bentuk tertentu misalnya garis, lingkaran, bujur sangkar dan lainnya.
- QRImage, untuk menampilkan picture dari file tertentu.
Penulis akan membuat tampilan laporan seperti berikut ini:

Sebelum membuat tampilan lebih dulu kita kopi Table1 di Form1 dan di-paste pada Quick Report. Pastikan property Active pada Table1 adalah true, cek isi property TableName dan property DatabaseName apakah sudah betul. Kemudian ubah property DataSet di Quick Report ke nama tabel yang kita gunakan (Table1).
Untuk laporan diatas terdiri dari 4 (empat) bagian , kita akan membuat masing masing bagian dengan menggunakan QRSBand.

2. Menghubungkan form dengan Quick Report
Kita tambahkan komponen button "preview" dan "print" yang akan menghubungkan form dengan Quick Report.

Untuk menghubungkan Unit1 (Form1) dengan Unit2 (QuickReport) maka ditulis perintah sesudah perintah implementation.
uses Unit2; // uses namaunitlaporan;
Program button preview:
procedure TForm1.btnviewClick(Sender: TObject);
begin
quickreport.Preview;
//namalaporan.preview (untuk menampilkan laporan)
end;
Program button print:
procedure TForm1.btnprintClick(Sender: TObject);
begin
quickreport.Print;
// namalaporan.print (untuk menge-print laporan langsung
// dari form tanpa masuk ke tampilan laporan)
end;
Demikian artikel tentang membuat laporan (report) sederhana dari database dengan menggunakan Quick Report. Source code program bisa di download di delphiqreport1.zip.
Jika anda ingin membukanya lebih dahulu letakkan database access pada ODBC ditempat dimana anda meletakkan database access program ini (ikuti langkah membuat Alias pada ODBC pada artikel Koneksi Database dari Borland Delphi ke MS Access). Kemudian explore pada object Database1 untuk memastikan database mahasiswa terhubung dengan form Delphi.

Sumber :
http://delphi-tips.blogspot.com/2011/07/author-ratih-kusumawati.html

Tag : report