对多行文本字段，单据体行高在编辑时，支持自适应行高的二开解决方案

栏目：云星空知识作者：金蝶来源：金蝶云社区发布：2024-09-23浏览：1

【应用场景】

对多行文本字段，二开支持在列表该字段支持自适应行高；并且在单据体录入该字段时，可支持自动行高的解决方案。

本方案可设置每行的最大行高，如果超过最大行高，在单据体录入时，自动出现滚动条。

【适用版本】

该二开方案，适用于2024年1月之后的星空产品版本，如使用的是2023年以及之前的星空产品版本，没有该二开方案的支持；

【解决方案】

如需要：在列表实现，多行文本的行高自适应显示：

可在列表插件设置多行文本自动高度、最大高度脚本：

import clr;
clr.AddReference('Newtonsoft.Json')
clr.AddReference('Kingdee.BOS')
from Kingdee.BOS import *
from Newtonsoft.Json import *
from Newtonsoft.Json.Linq import *
def AfterBindData(e):
    this.View.GetControl('FList').SetCustomPropertyValue('IsTextAreaAutoHeight', True)
    this.View.GetControl('FList').SetCustomPropertyValue('RowMaxHeight', 100)

操作截图：

如需要：在单据体实现，多行文本字段编辑时，行高自适应，

可在表单构建插件设置多行文本自动高度、最大高度脚本：

import clr;
clr.AddReference('Newtonsoft.Json');
clr.AddReference('Kingdee.BOS');
clr.AddReference('Kingdee.BOS.Core');
from Kingdee.BOS import *;
from Kingdee.BOS.Util import *;
from Kingdee.BOS.Core.DynamicForm.PlugIn import *;
from Kingdee.BOS.Core.DynamicForm.PlugIn.Args import *;
from Newtonsoft.Json import *;
from Newtonsoft.Json.Linq import *;
def CreateControl(e):
    if e.ControlAppearance.Key.ToUpper() == 'FENTITY':
        e.Control["istextareaautoheight"] = True;
        e.Control["rowmaxheight"] = 100;