FastReport自动压缩字体

2025-06-07 17:38:52

1、选中需要自动压缩字体的文本框，然后点击左侧事件，在OnBeforePrint后面双击进入代码页面。

2、在代码也中的下图位置加上下图脚本。控件名称改为当前选中的实际控件名（即下图左侧红框中的名称）。if Length(Memo38.value)>100 thenMemo38.Font.size:=7else Memo38.Font.size:=12;

3、预览打印效果如下图（备注同包装方式字段）

声明：本网站引用、摘录或转载内容仅供网站访问者交流或参考，不代表本站立场，如存在版权或非法内容，请联系站长删除，联系邮箱：site.kefu@qq.com。