fastreport打印的最后一页问题(100分)

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #1

因为我现在打印出来的都象单行本那样要有下划线的。但在打印到最后一页时，如果
数据打印页的中间就完了，就不会打印下划线了，但我想在最后空出来的页也打印下划线
要怎样做阿！！急！！急！！急！！！

 

山

山泉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #2

是不是这种效果
http://www.datacn.com/images/print1.gif
需要改fastreport的代码

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #3

不太一样，我这里是变量赋值（用memo），打印出来就象书本一样，就是每一行都要
下划线。当内容打完后，如果没到前页底，就继续打，但没内容只有下划线。

 

山

山泉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #4

晕，下划线，竖线都是自己花出来的
你主项数据没有竖线，不就一样了？？

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #5

我这里是变量赋值（用memo），打印出来就象书本一样，就是每一行都要
下划线。当内容打完后，如果没到前页底，就继续打，但没内容只有下划线。

 

山

山泉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #6

fastreport 的memo 要这种效果？
我这里是变量赋值（用memo），打印出来就象书本一样，就是每一行都要
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
下划线。当内容打完后，如果没到前页底，就继续打，但没内容只有下划线。
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #7

是啊！我就是要最后一页时把剩下空出来的也划下划线。

 

P

PigDong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #8

你放一个PageFooter，在那上面用画笔画一条线，就每页都有了。别告诉我你不会在
pagefooter上画线啊

 

R

redfox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #9

拿分来!
极其简单,在数据集添加剩余的行数个空记录即可.

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #10

我只是要最后一页，而且不划一条线，是要根据memo中每行的行距划行，一直到页的最后，
就象单行薄的纸那样。

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #11

to redfox:
我要怎样知道剩余的行数啊？而且行的间距是我设定的，打印的内容是用变量赋值给
Memo的，不是数据集。

 

P

PigDong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #12

打印空行，打印时，把memo左右两侧的竖线去掉。
打印空行的方法
放一个MasterFooter(如果有就不用了)在其OnBeforePrint事件中写
While FreeSpace>(memo的高度)do
ShowBand（Child1）;
然后报表上放个Child条，上面画上和MastData一样的memo，只是memo里面没有内容把memo左右
两侧的竖线去掉.
这就OK了！

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #13

to pigdong:
FreeSpace是怎样定义啊？没有这个函数啊？能详细一些吗？？
万分着急中！！！！

 

P

PigDong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-28

• #14

不用定义，这是Fr自带的。我的原理就是打印空行，把中间的竖线去掉，不久全是横格了吗
还有，这些代码事写在报表模版的脚本里的，不是delphi中
千万记住，Child的名字一定和Showband中的名字相同，要不一打就死机

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-31

• #15

非常感谢PigDong！！问题解决了！

 

L

llzzyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-31

• #16

接受答案了.