摘要:
欢迎大家加入 阅读全文
摘要:
计算角度利用反正切注意斜率存在的条件,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 阅读全文
摘要:
效果如下 第一步下载,智能提示显示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 阅读全文