ForthatyoucanusetheTopMostPropertyofMsgBox(Number262144)MsgBox("Hellothere",262144,Title:="Outoffocus")Edit: AnotherwaytoaccomplishthisiscreatingatemporaryformUsingform=NewForm()With{.TopMost=True}

曲线求取点，利用几何库<CommandMethod(NameOf(TT_PolyLineCrossCheck))>PublicSubTT_PolyLineCrossCheck()DimdocAsDocument=Application.DocumentManager.MdiActiveDocumentDimdbAsDatabase=doc.DatabaseDimedAsEditor=doc.Editor'

求取空间任意曲线在xoy/yoz/xoz平面的投影  <CommandMethod(NameOf(TT_CurveProjected))>PublicSubTT_CurveProjected()DimdocAsDocument=Application.DocumentManager.MdiActiveDocumentDimdbAsDatabase=doc.DatabaseDimedAsEditor=

当前文档保存总出问题现在借助com的方法实现了保存文件<CommandMethod(NameOf(TT_SaveDrawing))>PublicSubTT_SaveDrawing()DimdocAsDocument=Application.DocumentManager.MdiActiveDocumentDimdbAsDatabase=doc.DatabaseDim

接上期的内容,此次读取view的下一层几subview主要用到下面的方法获取view的第一个子级一个封装的类PublicClassDrawingExpolrerExPublicSharedFunctionDrawingHasViews(draftAppAsMarDrafting)AsBooleanDimvhAsMarElementHandleTry

今天我们研究下读取drawingexpolrer的第一层级：view下面的图纸的层级目录示意图，我们今天需要获取所有的view 主要用到2个方法：1#获取第一个元素MarDrafting.ElementChildFirstGetMethod(） 2#获取相邻的元素MarDrafting.ElementSiblingNextGet Method  

由于AM的marapi的大部分类实现了IDisposable接口，所有避免内存过大，用了一般需要dispose下微软官方的解释：https://learn.microsoft.com/zh-cn/dotnet/api/system.idisposable?view=net-7.0 以下是MarDrafting类的定义，很显然它实现了IDisposable接口 ImportsSystem.Reflec

显现的效果 代码实现：<MyAmFunctionAtt(NameOf(绘图控制),NameOf(新建曲线))>PublicSub新建曲线(wmAsWindowManager)DimdraftAppAsNewMarDraftingDimuiAsNewMarUi'ImportsAveva.Marine.UIDimutilyAsNewMarUtil'ImportsA

根据MarApi,创建图形文件，新建文字ImportsAveva.ApplicationFramework.PresentationImportsAveva.Marine.Drafting'marAPI.dllPublicClass绘图控制<MyAmFunctionAtt(NameOf(绘图控制),NameOf(新建图纸))>PublicSub新建图纸(wmAsWindowManager)Di

修改HullDesign程序的主题以及菜单项的快捷键 引用的dll文件下面的是代码和快捷键配置文件：https://files.cnblogs.com/files/NanShengBlogs/AMShortCut.HullDesign.zip?t=1695908179&download=trueImportsAveva.ApplicationFramework.PresentationImportsAveva.Applic

引用的DllAveva.ApplicationFramework.dllAveva.ApplicationFramework.Presentation菜单展示效果创建Attribute,用于反射来动态创建菜单，不用每次都去写commandPublicClassMyAmFunctionAttInheritsAttributePrivate_menuNameAsStringPublicPropertyM

遇到要求单行文字包围和的需求,发现AutoCAD自带的算法仅能求出正交包围盒,如下图所示的粉色矩形我想获取下图下图所示蓝色矩形的部分及OBB计算方法图形示例:下面是完整的代码,其中求D点的坐标p1涉及到向量定比分点公式<CommandMethod(NameOf(TT_SingleTextOBB))>SubTT