报表中固定框内字体自动缩小以及打印问题---急急急--200分(200分)

  • 主题发起人 主题发起人 wanged
  • 开始时间 开始时间
W

wanged

Unregistered / Unconfirmed
GUEST, unregistred user!
1、FastReport.Memo的數值超過邊界自動減少字體大小,直到字數正好全部打印出來,即像xls文件中的自动缩小填充类似
2、报表打印线框深浅不同,报表打印时第一页的边框颜色要比下面其他页的颜色深,文字颜色没有该情况
 
1.有一個變通的辦法:在Memo的OnAfterData事件中寫代碼,經測試可行:
case TfrxMemoView(Sender).value of
0..100:TfrxMemoView(Sender).font.size:=10;
101..1000:TfrxMemoView(Sender).font.size:=9;
1001..10000:TfrxMemoView(Sender).font.size:=8;
end;
2.??
 
2、报表打印出2页以上的时候,会发现第二页和以后的表的边框会变浅,不如第一页的颜色深,不清楚什么原因?
 
首先感谢001zqk,我对fastreport接触的不多,,测试的时候,提示"标识符未申明'value'",如何引用呢
 
1.在frxMemoView.OnAfterData/OnBeforePrint:
begin
while ((TfrmMemoView(Sender).CalcHeight-TfrxMemoView(Sender).LineSpacing)-TfrxMemoView(Sender).Height>0)do
begin
TfrxMemoView(Sender).Font.Size := TfrxMemoView(Sender).Font.Size-1;
end;
end;
具体看这贴:http://www.delphibbs.com/delphibbs/dispq.asp?lid=2995370
 
感谢wordpress,第一个问题以经好了
 
多人接受答案了。
 
后退
顶部