有人在用fastReport作报表时处理过字体自动缩小的问题吗,怎么做
1个回答
2017-02-27
展开全部
在我常用的finereport中可以直接调整字体的大小的,稍微看了一下,如果想要在fastreport中实现字体自动缩小,可以进行如下操作:
在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;
在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;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询