修改fastreport纸张的高度(50分)

  • 主题发起人 主题发起人 cmlsc
  • 开始时间 开始时间
C

cmlsc

Unregistered / Unconfirmed
GUEST, unregistred user!
我在用fastreport设计一个商店收银时候打印出来的小票,显示的内容没有问题,但纸张的高度始终没有办法改变,用frxReport1.Pages[0].Page.Height=xxxx也不起作用。不知道谁可以赐教一下。
 
用自定義紙張試試看吧。
 
纸张格式都已经是设计好的了,只需要改变纸张高度。
 
var
sPage: TfrxComponent;
begin
try
frxReport.LoadFromFile(AFileName);
sPage := frxReport.FindObject('Page1');
with (sPage as TfrxReportPage) do
begin
PaperWidth := 290; //纸张宽度 单位毫米
PaperHeight := 210; //纸张高度 单位毫米
end;
end;
 
这应该在哪个事件里面加代码呢?
FormShow?
 
汗....................
我贴出来的代码能达到修改报表纸张高度和宽度的功能,至于你要什么时候修改,那要看你的,一般在 ShowReport 之前执行就可以了。
 
谢谢,实在帮大忙了。
但还想再问问,在用fastreport设计报表的时候,我摆了几个域,它们的Height属性都不大,像3.0,0.68那样,然后我在程序里面通过frxReport1.Pages[0].FindObject('MasterData1').Height这种方式来读取它们的Height属性,但读出来的结果却是113.59,25.46这样的数值,这是什么原因呢?如果我想读取到正确的值,应该怎么处理?
谢谢!
 
你读出来的数据是正确的,只是它们的单位为:Point,也就是磅。
并不是所有的单位都是毫米的。
 
我是新人,请高手帮忙帮我有C/C++写一段用远程插入的方法隐藏进程的代码,再另外用伪隐藏的方法写一个,就是在任务管理器里面看不到就可以了,请高手帮忙,小弟真的急用啊!
 
你真是太厉害了,有联系方式吗?
我喜欢的不是变成了金子之后的石头,而是能够点石成金的神仙棒。
 
呵呵!晕!
我QQ:12424597 ,可以加我QQ,但是我不你想像的“神仙棒”!
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
878
DelphiTeacher的专栏
D
D
回复
0
查看
846
DelphiTeacher的专栏
D
D
回复
0
查看
797
DelphiTeacher的专栏
D
I
回复
0
查看
820
import
I
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部