我的表头标题为什么不显示,请教,急!(100分)

J

joinrry

Unregistered / Unconfirmed
GUEST, unregistred user!
我写了一段动态创建报表的代码,但不知什么原因,预览时可以显示表头标题,
可打印出来的时候表头标题就不见了,而且纸张上没有留下表头标题的位置。
qrpsingle := TQuickRep.Create(self);
qrpsingle.Bands.HasColumnHeader := true;
qrpsingle.Bands.ColumnHeaderBand.Height :=30;
qrpsingle.Bands.HasDetail := true;
qrpsingle.Bands.DetailBand.Height :=25;
qrpsingle.DataSet := qrpadoqry;
//创建报表标题
qrpband := TQRBand.Create(self);
qrpband.Parent :=qrpSingle;
qrptitle :=TQRLabel.Create(self);
qrptitle.Parent :=qrpband;
qrptitle.Caption :='TempTitle';
 
這真的是奇怪耶﹐你是自己在OnPrint中寫的﹐還是程序默認的﹖
 
打印函数没有写,是调用quickrep的预览,然后直接打印!
 
>>qrpband := TQRBand.Create(self);
>>qrpband.Parent :=qrpSingle;
qrpband.BandType:=rbTitle;
>>qrptitle :=TQRLabel.Create(self);
>>qrptitle.Parent :=qrpband;
>>qrptitle.Caption :='TempTitle';
 
quickrep不是就有这样的选项吗?
 
首先感谢netatom的解答,是的,应该加上这段代码,但还是不行,我现在知道原因了,
是纸张设置的问题,因为我并没有重新设置纸张的大小,而他默认的为A4,但我用的
是210*280的打印纸,不知怎样动态重设打印纸的大小?
 
各位老大,不知应该怎样动态设置纸张的大小呢?感谢!
 
把表头下一点就可以
 
我使用epson lq300k,star 3200系列时遇到过这个问题。分析是打印机驱动的问题。将
打印机设为lq1600k即可。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
578
import
I
顶部