摘要：
计算角度利用反正切注意斜率存在的条件，X不能为0，先要剔除再坐标中上的情况，在分类讨论计算实际的角度，范围0~2PI p0 = pl.Coordinate(0) p1 = pl.Coordinate(1) Dim v As Variant, lth As Double v = Array(p1(0) 阅读全文
摘要：
书上说，射线法和叉乘法感觉都不完整 下面我分享我写的基于AutoCAD BREP算法 var ed = acApp.Application.DocumentManager.MdiActiveDocument.Editor; var peo = new PromptEntityOptions("Sel 阅读全文
摘要：
此处用到的库是Itextsharp /// <summary> /// 合成pdf文件 /// </summary> /// <param name="pdffileList"></param> /// <param name="outMergeFile"></param> /// <param n 阅读全文
摘要：
制作的exe程序，就存在版本兼容性问题 用2022 api编译的exe在2024 中无法启动 解决方案 将exe放在如下位置从此处启动exe即可 从宏中可以获取 string XSDATADIR = ""; TeklaStructuresSettings.GetAdvancedOption("XSD 阅读全文
摘要：
CAD中有些文字需要随着图纸的当前条件的变化自动变化，例如保存日期、打印日期、打印比例等等。 CAD早期版本只是在扩展工具中提供了动态反应文字（rtext）功能，动态反应文字可以用CAD的Diesel表达式来定义动态文字，也可以动态链接文本文档，文本文档被编辑后，图纸中的文字会自动更新。 由于大多数 阅读全文
摘要：
项目的完整下载地址 https://files.cnblogs.com/files/NanShengBlogs/AMCSTest.zip?t=1698491030&download=true 先看效果 下面先看实现的几个函数 1# 创建wpf的用户控件，无选项的参考此链接修改csproject文件 阅读全文
摘要：
此系列的教程，暂时不更新，因为没多少人愿意加入一起学习的行列，有需要学习的可以加我微信或者QQ讨论 电话：17607170146（微信同号） QQ：442024898 提取图纸中的文字， <MyAmFunctionAtt(NameOf(用户交互), NameOf(选择单个文字))> Public S 阅读全文
摘要：
求取空间任意曲线在xoy/yoz/xoz平面的投影 <CommandMethod(NameOf(TT_CurveProjected))> Public Sub TT_CurveProjected() Dim doc As Document = Application.DocumentManager. 阅读全文
摘要：
当前文档保存总出问题 现在借助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 阅读全文
摘要：
今天我们研究下读取drawing expolrer的第一层级：view 下面的图纸的层级目录示意图，我们今天需要获取所有的view 主要用到2个方法： 1# 获取第一个元素 MarDrafting.ElementChildFirstGet Method (） 2# 获取相邻的元素 MarDrafti 阅读全文
摘要：
由于AM的marapi的大部分类实现了IDisposable接口，所有避免内存过大，用了一般需要dispose下 微软官方的解释： https://learn.microsoft.com/zh-cn/dotnet/api/system.idisposable?view=net-7.0 以下是MarD 阅读全文
摘要：
显现的效果 代码实现： <MyAmFunctionAtt(NameOf(绘图控制), NameOf(新建曲线))> Public Sub 新建曲线(wm As WindowManager) Dim draftApp As New MarDrafting Dim ui As New MarUi 'Im 阅读全文
摘要：
根据MarApi,创建图形文件，新建文字 Imports Aveva.ApplicationFramework.Presentation Imports Aveva.Marine.Drafting ' marAPI.dll Public Class 绘图控制 <MyAmFunctionAtt(Nam 阅读全文
摘要：
修改HullDesign程序的主题以及菜单项的快捷键 引用的dll文件 下面的是代码和快捷键配置文件： https://files.cnblogs.com/files/NanShengBlogs/AMShortCut.HullDesign.zip?t=1695908179&download=true 阅读全文
摘要：
引用的Dll Aveva.ApplicationFramework.dll Aveva.ApplicationFramework.Presentation 菜单展示效果 创建Attribute,用于反射来动态创建菜单，不用每次都去写command Public Class MyAmFunctionA 阅读全文
摘要：
获取图纸数据库 查看代码 public static Dictionary<string,List<DbElement>> GetDbElements(DbType dbtype) { Dictionary<string, List<DbElement>> rtn = new Dictionary< 阅读全文
摘要：
继上次powershell运行accoreconsole(https://www.cnblogs.com/NanShengBlogs/p/10981687.html)的研究之后又觉得不是很合适，毕竟powershell还存在权限问题，不像vbs这么windows原生的的脚本好用。 脚本主要部分 1 阅读全文
摘要：
定义一个函数，随AutoCAD 启动加载当前程序集到autocad，涉及到写入注册表，注意这是在autocad内部加载dll之后处理的方法。。。。 写入HKLM表示所有登录的用户都会受影响(autocad 需要以管理员身份启动才能成功写入注册表)，写入HKCU表示当前登录的用户才会收影响 "LOAD 阅读全文
摘要：
基于CMD 编写批处理程序很反人类，此篇文章介绍利用Power Shell脚本(借鉴明经net版主雪山飞狐的脚本改造而成)处理之前的Bat+scr的过程（https://www.cnblogs.com/NanShengBlogs/p/10957489.html） Windows PowerShell 阅读全文
摘要：
效果如下 第一步下载，智能提示显示xll文件 Releases · Excel-DNA/IntelliSense (github.com) xll文件报病毒解决办法 默认情况下，Excel 正在阻止不受信任的 XLL 加载项 - Microsoft 支持 第二步，加载xll文件，xll文件放在exc 阅读全文
摘要：
引用的win32 api Option Explicit Declare PtrSafe Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long Declare Pt 阅读全文
摘要：
利用选择功能 public ModelObjectEnumerator getAllWeldsFromModel() { ModelObjectEnumerator.AutoFetch = true; ObjectFilterExpressions.Type objectType = new Obj 阅读全文
摘要：
有这么一个需求我需要将其他软件提取管子信息在AutoCAD中重新搭建3D管线模型 数据如下 最终AutoCAD模型如下 疯转的管子信息代码如下 public class PipeData { public string Name { get; set; } public string Materia 阅读全文
摘要：
参考的博客：https://www.cnblogs.com/JJBox/p/14300098.html 下面是计算示例 主要计算代码： var peo = new PromptEntityOptions("选择直线1") { AllowNone = false, AllowObjectOnLocke 阅读全文
摘要：
主要的代码如下 try { WindowManager.Instance.StatusBar.StartProgressDisplay(); WindowManager.Instance.StatusBar.ProgressMinimum = 0; WindowManager.Instance.St 阅读全文