> menulis detail ke samping.
> Contoh :
> QUICK Report
> QRTitle : KODE BARANG NAMA BARANG
> QRDetail : 8856 Bru ru
> QRSUB Detail : 34 12 34 56 57 88 99 (bukanya kebawah).
>
>
> Jadinya seperti ini :
> KODE BARANG NAMA BARANG
> 8856 Bru ru
> 34 12 34 56 57 88 99
>
> Mohon pencerahanyanya
>
> Terima Kasih
>
Kita bisa memanfaatkan QRGroup (jangan lupa mengisikan Expresion dgn field
header/field anda yang berisi data 8856)
dan QRBand yang bertipe GroupFooter yang nantinya semua pencetakan kita
alihkan ke even GroupFooter Before Print.
sedangkan pada QRBand bertipe Detail hanya berisi variabel text yang
fungsinya untuk menampung record yang memanjang kebawah menjadi memanjang
kekanan.
mungkin flow nya spt ini:
procedure TQuiRep.GroupNipBeforePrint(Sender: TQRCustomBand; var PrintBand:
Boolean);
begin
// ini untuk mencetak record headernya, untuk masalah anda adalah
mencetak: (8856 Bru ru)
end;
procedure TQuiRep.DetailBeforePrint(Sender: TQRCustomBand; var PrintBand:
Boolean);
begin
variabel_text:= variabel_text + field data yg memanjang ke bawah (field
anda yang berisi 34,12,34,dst)
end;
procedure TQuiRepTelat.FooterNipBeforePrint(Sender: TQRCustomBand; var
PrintBand: Boolean);
begin
QRLabel.Caption:= variabel_text;
end;
Catatan: Aktifkan Query anda dengan Order by <kode barang>
semoga membantu
:-)
(DeDeL)
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
| Yahoo! Groups Sponsor |
| Get unlimited calls to U.S./Canada |
Yahoo! Groups Links
- To visit your group on the web, go to:
http://groups.yahoo.com/group/Delphindo/
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
