fastreport可不可对某一列重复显示?(100分)

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-21

• #1

我在报表设计中,在主资料里只放一个barcodeview用来显示条码.我想根据客户要求重复打印同一条条码数量,要怎么做,即要求显示如下结果:
要打的数量=3时,显示要求:
条码记录1 条码记录1 条码记录1 条码记录2 条码记录2 条码记录2
(只要同一条显示=数量就行,横或竖显示都无所谓).

 

J

JonnyZheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-21

• #2

答案是可以.
如果你的报表模板是里控件动态创建就是了....如果不知道怎么创建,就看一下手册.

 

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-21

• #3

我的报表不是动态建的?
你的原理是不是判断变量是多少就建多少个barcodeview?
(因客户如打一种商品,他可能要打几百个同一种条码贴商品)

 

J

JonnyZheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-22

• #4

如果如你所说,同一商品BARCODE可能打几百个,也可能打几个,具体数量要根据表里的某个字段或者由客户动态指定的话,那么动态创建并不适合,而采用子报表则好处理一些,改动也小,写一小段脚本就可以处理好了.

 

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-22

• #5

子报表怎么写脚本?
可否给代码参考?

 

J

JonnyZheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-22

• #6

留下MAIL,或发MAIL到JonnyZheng@163.com

 

3

340340

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-22

• #7

如果你愿意，你还可以设置给用户自己控制要打多少重复项，也可以动态创建他想要的组件和让对应组件获取对应的数据库信息，甚至你还可以更“花哨”地一切界面的东西交给客户，而只需要让他们在命名时遵循一定规范。。。兄弟，先看看书。。。再问

 

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-23

• #8

动态创建我知,我一页可以最多给他创建重复打65次,5列13行的格式(10页可以打650次,应该可以满足他们的要求).因程序提供:设计,预览,列印功能,如客户他们自己在设计加多了东西(如商品名),那动态建就不能办的到.

 

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-23

• #9

E-Mail: zsm75@163.com
QQ: 157864851

 

X

xhr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-23

• #10

顶

 

Z

zengs01

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-23

• #11

此问题已经解决了.
我在onManualBuild中写了以下代码就行了.
procedure Tfrf.frReport1ManualBuild(Page: TfrPage);
Var
i : integer;
begin
if isPRINTTIME then
begin
DMSYS.DSMain.First;
While not DMSYS.DSMain.Eofdo
begin
Page.ShowBandByType(btMasterData);
if StrToInt(frFmSBar.EditPrintTime.Text) > 1 then
begin
for i:= 2 to StrToInt(frFmSBar.EditPrintTime.Text)do
Page.ShowBandByName ('MasterData1');
DMSYS.DSMain.Next;
end else
begin
DMSYS.DSMain.Next;
end;
end;
end;
end;

 

3

340340

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-29

• #12

恩，精神可嘉，楼主同意偶收藏整理你的这问题否？偶打算有时间就整理本详细的关于FR3.18的东东出来