更改显示名称对象MOO图表

2020-09-19 19:46发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)嗨, 在MOO中,我们有一...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


嗨,

在MOO中,我们有一些"抽象"的类和操作(对象属性)。 我们希望在图表中轻松识别此信息,为此,我们想更改显示对象(名称)。 因此,如果类是抽象类,我们希望她的名字看起来像"草书",对于类操作也是如此。

示例:

课程:

非抽象类:IDbCommand

抽象类: IdbCommand


操作:

非抽象操作:获取_command文本():字符串

摘要操作: 获取_command文本():字符串


您有什么建议吗? 我们要创建文件扩展名吗?

谢谢

(75.7 kB)
4条回答
My梦
2020-09-19 20:36 .采纳回答

这是用于重置喜欢的颜色的代码示例。

'创建一个名为Table_1的表的PDM。 添加一些列。 将其中之一设置为主键。

显式选项

Dim tbl,TabSymbol,col,TabFonts,ColumnFonts,PrimaryKeyFonts

'---------------------------------------------- ---------------------------
'为表名设置字体
'为表中的列设置字体。 颜色设置为250,50,150
'--------------------------------------- ---------------------------------
TabFonts =" DISPNAME" + CStr(RGB(250,0, 0))+" Arial,12 N"
ColumnFonts =" Arial,8,B,250,50,150"
PrimaryKeyFonts =" Harrington,8,B,250,250,150"

'---------------------------------------------- -------------------------
'遍历整个PDM图。 设置每个表的字体
'遍历每个表的符号设置
'初始化每个表的SubObject(列字体)。
对于Activemodel中的每个tbl。对于每个TabSymbol,表
中的tbl.symbols中的每个TabSymbol
TabSymbol.SubObjects =""
'设置每个表的字体和颜色。
'如果tbl.name =" Table_1"然后
'TabSymbol.FillColor = Cstr(RGB(20,120,100))
'TabSymbol.FontList = TabFonts
'其他
'TabSymol.FillColor = Cstr(RGB(200,100,20))
'如果结束

'表格背景颜色
TabSymbol.FillColor = Cstr(RGB(0,100,0))
TabSymbol.FontList = TabFonts

'在tbl.Columns中为每个列设置列字体
'再次初始化子对象。只需给它命名
如果TabSymbol.SubObjects =""然后
TabSymbol.Subobjects =" 列字体"
如果结束

'如果列是主键,则设置为不同的字体
如果col.Primary = True然后
TabSymbol.SubObjects = TabSymbol.SubObjects和vbCrLf&col.ObjectID&PrimaryKeyFonts
其他
> TabSymbol.SubObjects = TabSymbol.SubObjects和vbCrLf&col.ObjectID和ColumnFonts
如果
下一个
下一个
下一个

结束

ActiveDiagram.RedrawAllViews()

一周热门 更多>