日韩在线观看电影_四虎一级片|HD中文字幕在线播放,午夜免费久久,国产高清一区二区,亚洲天堂狠狠干

易寶電子貿易管理軟件論壇

注冊

 

發新話題 回復該主題

[分享] 打印格式里,若字段不自動換行如何使字段的字體自動縮小 [復制鏈接]

1#
銀光圖片

(1)打印預覽里,查看該字段打印出來可以看到幾個字符

例如上圖的,如果沒有自動換行,型號顯示出來的就是“CFR-25JT-52-120R-”

一共17個字符,或者在數據里輸入select len('CFR-25JT-52-120R-')可知道


2)在打印格式里,選中該字段格式化字段-字體點擊字體大小的


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

)




分享 轉發
TOP
發新話題 回復該主題