1、选中需要自动压缩字体的文本框，然后点击左侧事件，在OnBeforePrint后面双击进入代码页面。
2、在代码也中的下图位置加上下图脚本。控件名称改为当前选中的实际控件名（即下图左侧红框中的名称）。if Length(Memo38.value)>100 thenMemo38.Font.size:=7else Memo38.Font.size:=12;
3、预览打印效果如下图（备注同包装方式字段）
FastReport自动压缩字体
时间：2024-10-25 16:34:00
时间：2024-10-25 16:34:00
1、选中需要自动压缩字体的文本框，然后点击左侧事件，在OnBeforePrint后面双击进入代码页面。
2、在代码也中的下图位置加上下图脚本。控件名称改为当前选中的实际控件名（即下图左侧红框中的名称）。if Length(Memo38.value)>100 thenMemo38.Font.size:=7else Memo38.Font.size:=12;
3、预览打印效果如下图（备注同包装方式字段）
