可以左右显示,你看看DELPHI自己带的DEMO就可以了
解决方案 »
- 怎样用select * from tname where ID in(......)
- 使用 ADOquery 添加数据的错误!
- SQL语句中表名如何用变量
- delphi如何对cookie进行读取操作!!
- 求螺旋方阵的算法
- 请教关于报表显示问题!!!!
- 请问FastReport、Report Builder(优秀的报表控件、工具都可以)的下载网址?
- QuickReport在windows2000下的打印问题,高分赠送
- 双击bdgrid中的某一字段,如何弹出一个窗口
- 请问:1、在什么地方定义一变量能全过程引用(不再要引用单元)2、如何取得程序的位置如:d:\asdss;
- 关于TComboBox的style属性声明
- 如何动态的在query中修改查到的记录的值?
不过,在beforeprint的事件中,可以进行一点处理,可以判断是不是1条记录,
在onneeddata事件中处理一下,先设个变量iswritehead,判断是不是要写主表的记录,
当从表记录写完后将iswritehead置真,
根据iswritehead的情况写主表记录
我看了Demo,可是里面没有左右显示的例子。至于将它设为2列,我只在Page属性里找到了一个Column属性,我设成2以后,Band确实可以只显示一半,但只能一个一个挨着放,而不能直接放到右边去。不过谢谢!to wangkt(webservice):
如果用这种方法,可不是麻烦了“点”啊,是非常非常的麻烦啊! :) 除非实在没有办法,要不然的话,我恐怕不会使用这种方法。对两位的回答非常感谢,但我还想期待更满意的答复。分数下次给。
谢谢!你的方法看起来比较切实可行,我回去试试!感谢各位!分数双手奉上!
procedure TQuickReport2.QRLabel1Print(sender: TObject; var Value: String);
var
afieldvalue:string;
I:INTEGER;
begin
I:=30;
with table2 do
begin
try
active:=false;
active:=true;
first;
while not eof do
begin
afieldvalue:=fieldbyname('FirstName').asstring;
qrimage1.canvas.font.name:='宋体';
qrimage1.canvas.font.size:=9;
qrimage1.canvas.textout(10,10,'姓名');
qrimage1.canvas.textout(10+i,10,afieldvalue);
next;
I:=i+100;
end;
finally
active:=false;
end;
end;
end;