问题 fastreport中列宽固定,根据字段内容多少自动调整行高?要求达到如下效果:
检验项目 标准要求 检测结果
-------------------------------------------------------
苯甲酸 ≤1.0 1.0
--------------------------------------------------------
铅(以Pb计) ≤0.05 <0.05
--------------------------------------------------------
具有所含原料水果、蔬菜
应具有的色泽,香气和滋 合格
感官指标 味,无异味,无肉眼可见
的外来杂质
-------------------------------------------------------
糖精钠 ≤0.15 0.094
--------------------------------------------------------
检验项目 标准要求 检测结果
-------------------------------------------------------
苯甲酸 ≤1.0 1.0
--------------------------------------------------------
铅(以Pb计) ≤0.05 <0.05
--------------------------------------------------------
具有所含原料水果、蔬菜
应具有的色泽,香气和滋 合格
感官指标 味,无异味,无肉眼可见
的外来杂质
-------------------------------------------------------
糖精钠 ≤0.15 0.094
--------------------------------------------------------
stretched项选择true。
memo项stretch选择打勾;
stretchmode选smActualHeight。
并且报表比你的复杂多了,都可以实现,
你的报表应该没有问题的
var
fm: TfrMemoView;
W, h: integer;
begin fm := TfrMemoView.Create;
fm.Prop['textonly'] := true;
fm.Prop['ALIGNMENT'] := ALIGNMENT;
fm.Font.Assign(f); fm.Prop['top'] := r.Top;
fm.Prop['left'] := r.Left;
fm.Prop['FRAMETYP'] := FRAMETYP;
fm.Prop['width'] := r.Right - r.Left;
fm.Prop['height'] := r.Bottom - r.Top;
fm.Memo.Text := s; p.Objects.Add(fm)
end;
在band选项Allowslip选true。
stretched项选择true。
内容多的列memo项stretchmode选smMAXHeight ,少的选smdontstretch