摘要:
当前文档保存总出问题 现在借助com的方法实现了保存文件 <CommandMethod(NameOf(TT_SaveDrawing))> Public Sub TT_SaveDrawing() Dim doc As Document = Application.DocumentManager.Mdi 阅读全文
摘要:
接上期的内容,此次读取view的下一层几subview 主要用到下面的方法获取view的第一个子级 一个封装的类 Public Class DrawingExpolrerEx Public Shared Function DrawingHasViews(draftApp As MarDrafting 阅读全文
摘要:
显现的效果 代码实现: <MyAmFunctionAtt(NameOf(绘图控制), NameOf(新建曲线))> Public Sub 新建曲线(wm As WindowManager) Dim draftApp As New MarDrafting Dim ui As New MarUi 'Im 阅读全文
摘要:
引用的Dll Aveva.ApplicationFramework.dll Aveva.ApplicationFramework.Presentation 菜单展示效果 创建Attribute,用于反射来动态创建菜单,不用每次都去写command Public Class MyAmFunctionA 阅读全文