大哥们,帮帮我吧,小弟谢谢各位了,急,我怎么可以用fast report实现如下报表打印 (150分)

  • 主题发起人 主题发起人 handwang
  • 开始时间 开始时间
我不太会用fr,但是有个想法:设组号为一个空格和一个数字,if 试验号=1 then
组号:='';
if 试验号=2 then
组号:=1。不知道行不行,献丑了。
 
aahben:可是那线怎么解决呢,我现在就是发愁,因为放组号的那个单元格是根据试验号自动合并的,然后居中显示,我觉得只能通过在delphi里面写程序控制。请问那为仁兄可以给我端源码看看。
 
居中就比较难了 目前好象只有 REPORTMACHINE 3.0 可以做到
不过这个客户也太刁了!
 
分组号居中,可以按如下办法:
1。在band中设置放组号的那个单元格 为“不重复显示”;
2。设置报表为“两便报表”
3。数据集设置为按组号+试验号 索引;
4。在frReport中的band中定义2变量,统计组号相同的band和当前组号
3。在报表的 OnEndBand 事件中,调整单元格位置。
procedure frReportEndBand(Band: TfrBand);
begin
if StrToInt(GroupMemo.Text)<>CurrentGroupNo then
GroupMemo.Top:=GroupMemo.Top +
(Band.Height * NumberOfGroup - GroupMemo.Height) div 2;
end;

也可以设置单元格为“垂直居中”,然后动态调整高度。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
856
import
I
后退
顶部