易宝电子贸易管理软件论坛

首页 » 客户交流区 » 常见问题 » 打印格式里,若字段不自动换行如何使字段的字体自动缩小
admin - 2015/7/9 16:10:44

(1)打印预览里,查看该字段打印出来可以看到几个字符

201

例如上图的,如果没有自动换行,型号显示出来的就是“CFR-25JT-52-120R-”

一共17个字符,或者在数据里输入select len('CFR-25JT-52-120R-')可知道


2)在打印格式里,选中该字段格式化字段-字体点击字体大小的

202


3)在格式公式编辑器里输入

Local NumberVar strLen := Len(trim({SellOrderItem.proPartNumber}))-17;//得到多余出来的字

符串长度,如果为负数,没为小于零

Local NumberVar i;//设置字体倍增次数每次 增加0.1大小

Local NumberVar str;//得出来的字体大小

if strLen>0//当大于零是说明超过了规定的字符串个数。

then

(

For i := 1 To strLen Do

(


//Local NumberVar charPos := strLen - i + 1;


str := 10-int(0.5*i)
// * length

);

str

)

else

(

10

)

200




1
查看完整版本: 打印格式里,若字段不自动换行如何使字段的字体自动缩小