- Buat sebuah proyek baru dan tambahkan sebuah report.
- Tambahkan komponen TTable pada report. Ubah property DatabaseName menjadi DBDEMOS, TableName menjadi Customer dan IndexName menjadi ByCompany. Aktifkan tabel dengan mengatur property Active menjadi True.
- Tambahkan komponen TQRGroup yang nantinya akan digunakan sebagai header dari group. Ubah property Expression menjadi COPY(Table1.Company, 1, 1). Expression tersebut digunakan untuk mengekstrak karakter pertama dari nama Company.
- Tambahkan komponen TQRExpr pada header band. Isi property Expression dengan COPY(Table1.Company, 1,1).
Gambar : Report dengan group saat design time
Gambar : Report dengan group saat run time
0 komentar:
Posting Komentar