关于报表的一个难题!!!(在线等待)(86分)

  • 主题发起人 主题发起人 kidman520
  • 开始时间 开始时间
K

kidman520

Unregistered / Unconfirmed
GUEST, unregistred user!
我正在做一个报表,要在一张a3的纸上,打印出五个表的内容,而每个表中的内容都
是多条,如果用QRSubDetail也只能实现的是整行都显示一个表的内容,而我需要做到
的是将两个表的内容并排显示,和一个表的内容在两列显示,不知道我说明白了没有?
我很急,希望高手帮忙!!!谢谢!
如果没有明白,可以问,我在线等待!!!
 
为何没有人回答我的问题?是分太少?太难?还是...?
我很急的,希望知道的朋友帮助一下,不知道的帮助up一下,谢谢!!!
 
用reportbuilder
 
请原谅我的无知,什么是reportbuilder?
如果是第三方控件,麻烦您告诉我去那里下载!!谢谢!!
 
为什么又没有人回话了???我很急的!!!
 
在202.117.210.31有下载的reportbuilder的.
 
Delphi的报表实现不了这种功能,换一个别的报表吧
 
是不是不用那个工具就解决不了问题???
 
在QuickReport控件的OnNeedData事件里写事件可以实现你说的功能,但比较麻烦:
主要思路就是用DetailBand里qrLabel打印你要打印的内容,
这样做要注意的问题就是:quickReport控件的DataSet不要连接任何表,所有的数据都
要手工写入
我写个一个表的你参考一下:

procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
with Query1 do
begin
Close;
SQL.Text := 'select aaa, bbb, ccc from table1';
Open;
end;
end;

procedure TForm1.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
begin
MoreData := not Query1.Eof;

QRLabel1.Caption := Query1.FieldByName('aaa').AsString;
QRLabel2.Caption := Query1.FieldByName('bbb').AsString;
QRLabel3.Caption := Query1.FieldByName('ccc').AsString;

Query1.Next;
end;
 
www.pcjingning.com看吧
RM控件,可以完成的
 
谁能告诉我reportbuilder这个东西怎么用,或是哪里有介绍的资料?

谢谢大家,帮忙up一下!!!
 
麻烦哪位大哥告诉我如何动态生成qrlabel控件,小弟没有用过,谢了!!
 
为什么一个多表打印的问题,这么久都没有人能帮我解决???
为什么呢???大家帮帮忙呀,我很急的!!!
 
一个最笨的办法就是你把所有的数据写进一个临时表,不就可以解决了吗!
 
同意楼上的意见,写一个存贮过程了。
 
fastreport45很好的
 
我倒是有数据库报表打印的经验,通过自己写的空间可以实现各种打印要求,只是要做成完全通用的有些烦,如果你愿意,可以给你段源吗自己研究。
 
我认为. 各种 控件都 好用.

只要你用得好. 用得熟 , 就会认为好用.

只是有一点. 我发现, 在98下做好的 报表, 在Win 2K 下, 打印会不正确 .
 
后退
顶部