Qreport报表设计的心得

注意：1.因为报表上会用到很多QRLabel ，QRshape控件，因为要注意分组区别命名，比如横向的QRshape与纵向的QRshape

          要区分一下，方便查找和统一定制样式。

         2.添加的报表控件一定要放在合适的位置，否则就预览出错了,要在Object TreeView中看下是否在正确的包含下。
         3.用代码为控件caption，name赋值

           例如：

View Code

procedure TFrmrsglrp1.FormCreate(Sender: TObject);
var
n,m:integer;
Q: array [ 1 .. 5 , 1 .. 6 ] of TQRLabel;
W: array [ 1 .. 5 , 1 .. 5 ] of TQRLabel;
E: array [ 1 .. 6 , 1 .. 5 ] of TQRLabel;

begin
Q[ 1 , 1 ] : = Q11; Q[ 1 , 2 ] : = Q12; Q[ 1 , 3 ] : = Q13; Q[ 1 , 4 ] : = Q14; Q[ 1 , 5 ] : = Q15; Q[ 1 , 6 ] : = Q16;
Q[ 2 , 1 ] : = Q21; Q[ 2 , 2 ] : = Q22; Q[ 2 , 3 ] : = Q23; Q[ 2 , 4 ] : = Q24; Q[ 2 , 5 ] : = Q25; Q[ 2 , 6 ] : = Q26;
Q[ 3 , 1 ] : = Q31; Q[ 3 , 2 ] : = Q32; Q[ 3 , 3 ] : = Q33; Q[ 3 , 4 ] : = Q34; Q[ 3 , 5 ] : = Q35; Q[ 3 , 6 ] : = Q36;
Q[ 4 , 1 ] : = Q41; Q[ 4 , 2 ] : = Q42; Q[ 4 , 3 ] : = Q43; Q[ 4 , 4 ] : = Q44; Q[ 4 , 5 ] : = Q45; Q[ 4 , 6 ] : = Q46;
Q[ 5 , 1 ] : = Q51; Q[ 5 , 2 ] : = Q52; Q[ 5 , 3 ] : = Q53; Q[ 5 , 4 ] : = Q54; Q[ 5 , 5 ] : = Q55; Q[ 5 , 6 ] : = Q56;
for n: = 1 to 5 do
begin
for m: = 1 to 6 do
begin
Q[n,m].Caption : = '' ;
end ;
end ;

W[ 1 , 1 ] : = W11; W[ 1 , 2 ] : = W12; W[ 1 , 3 ] : = W13; W[ 1 , 4 ] : = W14; W[ 1 , 5 ] : = W15;
W[ 2 , 1 ] : = W21; W[ 2 , 2 ] : = W22; W[ 2 , 3 ] : = W23; W[ 2 , 4 ] : = W24; W[ 2 , 5 ] : = W25;
W[ 3 , 1 ] : = W31; W[ 3 , 2 ] : = W32; W[ 3 , 3 ] : = W33; W[ 3 , 4 ] : = W34; W[ 3 , 5 ] : = W35;
W[ 4 , 1 ] : = W41; W[ 4 , 2 ] : = W42; W[ 4 , 3 ] : = W43; W[ 4 , 4 ] : = W44; W[ 4 , 5 ] : = W45;
W[ 5 , 1 ] : = W51; W[ 5 , 2 ] : = W52; W[ 5 , 3 ] : = W53; W[ 5 , 4 ] : = W54; W[ 5 , 5 ] : = W55;
for n: = 1 to 5 do
begin
for m: = 1 to 5 do
begin
W[n,m].Caption : = '' ;
end ;
end ;

E[ 1 , 1 ] : = E11; E[ 1 , 2 ] : = E12; E[ 1 , 3 ] : = E13; E[ 1 , 4 ] : = E14; E[ 1 , 5 ] : = E15;
E[ 2 , 1 ] : = E21; E[ 2 , 2 ] : = E22; E[ 2 , 3 ] : = E23; E[ 2 , 4 ] : = E24; E[ 2 , 5 ] : = E25;
E[ 3 , 1 ] : = E31; E[ 3 , 2 ] : = E32; E[ 3 , 3 ] : = E33; E[ 3 , 4 ] : = E34; E[ 3 , 5 ] : = E35;
E[ 4 , 1 ] : = E41; E[ 4 , 2 ] : = E42; E[ 4 , 3 ] : = E43; E[ 4 , 4 ] : = E44; E[ 4 , 5 ] : = E45;
E[ 5 , 1 ] : = E51; E[ 5 , 2 ] : = E52; E[ 5 , 3 ] : = E53; E[ 5 , 4 ] : = E54; E[ 5 , 5 ] : = E55;
E[ 6 , 1 ] : = E61; E[ 6 , 2 ] : = E62; E[ 6 , 3 ] : = E63; E[ 6 , 4 ] : = E64; E[ 6 , 5 ] : = E65;
for n: = 1 to 6 do
begin
for m: = 1 to 5 do
begin
E[n,m].Caption : = '' ;

end ;
end ;
end ;

4.做报表前先整体看下布局，有几行几列来控制QRshape的设计，有几种字体字形，内容边距，单元格内容布局，

转载于:https://www.cnblogs.com/gaiyang/archive/2011/03/22/1991003.html