Senin, 17 Maret 2014

DELPHI - Memberikan halaman dan total halaman pada quickrep / Get Page Number and Page Count in Delphi easily

Selamat Malam Pemirsa ... ! :D
Buat para pengguna QuickReport, pasti pada kesulitan nih mendapatkan PageCount atau Total Halaman dari Laporan yang dicetak..
Buat yang udah tau, mohon berbagi cara yang lebih simplenya yah :D

oke langsung aja yah... Hasilnya nanti akan seperti ini :

  Halaman 1/16 -> artinya kita sedang berada di halaman pertama dari total 16 halaman seluruhnya

Di tombol Preview, ketikkan coding :

  QuickRep1.Prepare;
  QRExpr1.Expression:= 'PAGENUMBER + '' / ' + INTTOSTR(QuickRep1.QRPrinter.PageCount) + '''';

  QuickRep1.Preview;

Syaratnya :

  Letakkan komponen QRExpr di dalam Quick Report.. Terserah agan mau taronya dimana :D

oke semoga bermanfaat yah..

Salam Coding dan Terimakasih telah berkunjung di giavano.blogspot.com ^_^

5 komentar:

  1. brooo ane punya masalah ni bro, di laporannya terbaca 2 halman tpi koq yg bsa d liat 1 halaman sja ..?? menentukan field/halaman itu gmna ya ,umpama halaman 1 maksimal 10 dan halaman 2 jga 10 pke quckreport ane bro , help mee ..............

    BalasHapus
    Balasan
    1. halo,
      untuk pembatasan bisa menggunakan fitur LIMIT (paging) di SQL nya
      Contoh :

      SELECT * FROM barang
      LIMIT 10, 1

      jadi nanti yang tampil hanya 10 item di halaman satu

      Hapus
  2. Bro ane ada masalah ne..
    Pada laporan ingin dibuat lebih dari 2 halan dan setiap halaman ada jumlah total nominal transaksinya, gimana gan?
    Mohon bimbingannya...

    BalasHapus
  3. untuk menghitung jumlah record yang sudah di grouping gimna ya gan.??

    BalasHapus