手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>delphi>列表

用Fast Report建立跨栏报表

来源:互联网 作者:西部数码 时间:2008-04-09
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

问:
每一个机器可以对应N多个模具,单重和出件数是模具的属性(如下图)。这样的报表用fastreport怎么建立,机器型号的CELL宽度怎么改变?请大家给我段事例代码。
———————————————-
|机器型号|模具型号|单重|出件数|
———————————————-
| | 9003-1 |120 | 5 |
| K813 | 7853-2 |100 | 6 |
| | 1235-7 | 50 | 10 |
———————————————-

答:
frReport.OnGetValue事件中设置相应frMemoView的FramTyp属性

问:
你可以在设置FramType的之前,查询相应模具的个数,然后再根据这个模具数,调整FramType属性。
如:
if ParName<>''''机器型号'''' then Exit;

if ((ModalCount div 2)>0) and (ModalCount<>1) then
begin
if 当前模具是第1个 then
begin
frMemoview.Framtype=13;
ParValue='''''''';
end else
if (当前模具<>ModalCount div 2) and (当前模具<>ModalCount) then
begin
frMemoview1.FramTyp=5;
ParValue='''''''';
end else
if (当前模具=ModalCount div 2) then
frMemoview1.FramTyp=5;
Inc(当前模具);
end
else if 当前模具=ModalCount then
begin
frMemoview1.FramTyp=13;
ParValue:='''''''';
end

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!