fastreport中一次打印多页，然后每次打出的内容略有变化，如何实现(100分)

H

hengzhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #1

想在预览界面中，按打印时，一次打印4页出来，每页的标题部分略有变化
比如：第一张时财务联，第二张是仓库联，第三张是销售联
请教，这样如何实现。

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #2

如果报表只有4页，而且每页除了标题其它都相同，建议楼主复制成4页的报表，这是最简单的方法了。

 

H

hengzhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #3

想在一个报表里面完成...
而且最好是利用打印预览窗口的打印按钮。

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #4

本来只有一页的报表复制成4页这样也可以吧?
不然只有一页的报表要动态创建其它3页，然后修改其标题，理论上是可以的，但是比上面的方法要麻烦好多。

 

H

hengzhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #5

我的描述有歧义，应该是这样的，做4个COPY，1份可能有多页...然后后面几份跟前面除了标题不同，其他全部相同..

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #6

我明白楼主的意思了。
procedure TForm1.Button3Click(Sender: TObject);
var
sImage: TfrxComponent;
begin
frxReport1.FileName := 'c:/1.fr3';
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '财务联';
frxReport1.PrepareReport(False);
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '仓库联';
frxReport1.PrepareReport(False);
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '销售联';
frxReport1.PrepareReport(True);
frxReport1.ShowPreparedReport;
end;

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-10

• #7

//不好意思，改一下
procedure TForm1.Button3Click(Sender: TObject);
var
sImage: TfrxComponent;
begin
frxReport1.FileName := 'c:/1.fr3';
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '财务联';
frxReport1.PrepareReport(True);
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '仓库联';
frxReport1.PrepareReport(False);
sImage := frxReport1.FindObject('Memo1');
(sImage as TFrxMemoView).Text := '销售联';
frxReport1.PrepareReport(False);
frxReport1.ShowPreparedReport;
end;

 

I

icc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-11

• #8

在标题栏里放上数据库字段也行啊

 

H

hengzhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-11

• #9

按照liyinwei的方式解决，谢谢各位