AutoCAD使用脚本获取文件名

最新推荐文章于 2023-11-11 13:21:05 发布
最新推荐文章于 2023-11-11 13:21:05 发布
阅读量1.2k 收藏 1
点赞数
文章标签： autocad
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/Aerstiin/article/details/117092307
版权
本文介绍了如何在AutoCAD中使用Diesel语言和AutoLisp来获取dwg文件的名称、编号等信息。通过Diesel表达式可以提取文件名的不同部分，如NNNNN编号和文件名本身。同时，利用AutoLisp进行变量赋值，进一步处理文件名。要使字段自动更新，需要设置FIELDEVAL系统变量。
摘要由CSDN通过智能技术生成

使用Diesel

插入MTEXT，内容     %<\AcVar dwgname>%

对内容进行处理如     AAAAA-NNNNN-AA-ABNNN 文件名.dwg

取第二部分NNNNN     %<\AcDiesel $(substr,$(getvar,dwgname),7,5)>%

取文件名     %<\AcDiesel $(substr,$(getvar,dwgname),22,$(-,$(strlen,$(getvar,dwgname)),25))>%

取文件名前面的部分     %<\AcDiesel $(substr,$(getvar,dwgname),1,20)>%

Field是否自动更新需要设置FIELDEVAL

类型: 整数
保存位置: 图形
初始值: 31

系统将使用下列位码值之和将该设置存储为一个位码：

0
最低0.47元/天 解锁文章
Aerstiin
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
lisp读点坐标绘多义线_如何用autolisp获取cad图形文件中直线和多义线的图层名...
weixin_39915204的博客
12-21 387
如何用autolisp获取cad图形文件中直线和多义线的图层名？用(cdr(assoc 8 (entget (car (entsel)))))就可以得到直线和其他实体的图层名。想要的程序是：点取一条直线，得到该直线的层名，然后将该层所有直线的线宽改为某个值。我现在想要的是“点取直线，获得层名”这一步。(setq lyname (cdr(assoc 8 (entget (car (entsel))...
中获取文件名不要扩展名_CAD中如何能提取图纸文件名的其中一段？
weixin_33584549的博客
01-14 1869
下面是本公众号文章分类目录，点击标题文字可打开分类文章列表：安装卸载异常、退出文件及输入输出基本操作技巧设置及相关问题界面和显示快捷键视图设置和调整图层管理颜色线型字体、文字样式和文字输入标注、引线和标注样式坐标系、坐标输入定位对象捕捉选择及组二维绘图多段线表格图块、属性块、动态块填充复制粘贴三维建模图形编辑和...
CSCAD AutoCAD系统变量大全
wuhenyidao的博客
04-09 1777
arx brx CSCAD系统变量 CAD二次开发 AutoCAD系统变量 CAD系统变量
AUTOCAD通过Diesel语言函数实现在图框中自动填充
Running_Zhang55的博客
05-09 688
（1）插入定义属性（2）属性定义这里可以通过Diesel表达式赋予属性的值（3）将若干定义属性组成块。
cad怎么选择一个对象打散vba_求助如何读取对应CAD文件名的代码，以及如何提取CAD组码组值的方式。...
weixin_42312523的博客
01-31 478
本帖最后由 jiamian0128 于 2019-7-25 12:32 编辑在之前的的问题里面，我求助了如何通过EXCEL VBA 提取CAD的数据，非常感谢论坛大神的帮助，现在能满足一些基本要求了，现在把附件代码贴出来。希望论坛大神如果方便能继续指导下小白如何把一些效果完善下，改进下代码。求助1：现在的情况是，读取的CAD文件只能是CAD程序当前打开的文件，能否把读取的CAD文件改为：当前路径名...
newlisp 获取文件名
Dean Chen的专栏
02-24 3384
newlisp对文件操作的支持有限，还是要自己做一些额外的工作。现在来获取linux下的文件名。输入是文件路径，返回文件名。;; get the file name without path (define (file-name file-full-path) (unless (file? file-full-path) (throw-error (append "file doesn't e
AutoLisp从入门到放弃（三）
qq_43462920的博客
06-13 3585
AutoLisp函数定义，制作、加载lsp代码文件。
AutoCAD系统变量大全.pdf
11-15
AutoCAD 系统变量大全 AutoCAD 系统变量是 AutoCAD 软件中预定义的一组变量，它们控制着 AutoCAD 的行为和显示方式。这些变量可以被用户修改，以适应不同的使用场景和需求。 1. ACADLSPASDOC：控制 AutoCAD 是否将...
BOM.zip_BOM_autocad_autolisp
09-23
AutoCAD是一款广泛使用的计算机辅助设计软件，常用于二维和三维绘图，而BOM则是在工程设计中列出所有构成产品或项目的组件及其数量的详细列表。 描述提到的功能是“从AutoCad的部件图的材料明细表中自动提取BOM清单...
AutoCAD .NET开发指南2012版》示例代码
12-09
《AutoCAD .NET开发指南2012版》是一本专为AutoCAD应用程序开发人员编写的实战手册，它深入探讨了如何使用.NET框架与AutoCAD进行集成开发。这本书的示例代码涵盖了各种功能，旨在帮助读者理解并掌握AutoCAD的二次...
kfy.rar_autocad_autocad 二次开发_lisp
09-21
LISP在AutoCAD中的应用主要是通过Visual LISP，它是一种集成开发环境（IDE），允许开发者用LISP编写脚本，然后在AutoCAD中直接运行。Visual LISP提供了丰富的API函数，可以访问AutoCAD的对象模型，如图层、线型、块...
AutoCAD 使用心德
10-30
最后，了解和掌握AutoCAD的定制和脚本编写能力，如使用LISP语言或VBA，可以使用户根据特定需求创建自定义工具，进一步提升工作效率。同时，定期备份工作、版本控制和错误修复也是保证设计安全的重要环节。 综上所述...
AUTOLISP——提取dwg图纸中的文字到txt存储
weixin_40960364的博客
08-24 3323
cad图中每个元素都叫图元，每个图元都有不同的属性，如图层、颜色、比例、内容等。 将图元组合在一起叫做选择集，方便批量操作与选择 本例子中图元为文字
autolisp函数大全，CAD的 lisp
VB973490770的专栏
11-11 2602
12．l（*error* 字符串）程序错误时的警示信息12．2（alert 字符串）以对话框式显示出警告字符串12．3（apply 功能函数列表）将功能函数与列表结合后执行12．4（defun 名称 自变量列表表达式＿．）自定函数或子程序12．5（eval 表达式）返回：表达式的执行结果12．6（exit）强制退出目前的应用程序12．7（lambda 自变量表达式）定义未命名的函数12．8（progn 表达式1 表达式2…）连接其内的表达式为一组，常用于配合if、cond等函数。
cad diesel表达式实例
冰影随风的专栏
04-17 3874
I am trying to automate a sheet tag with a Diesel expression in AutoCad. This gets me the twelfth character in the drawing name. But as soon as I get to sheet 10 this will say its sheet 0. $(substr,...
AutoCAD的AccoreConsole - 第二篇（执行脚本）
Gear Up Cloud
04-16 4387
通常情况下，我们不会这样一行行的输入，而是用脚本批处理。在这之前，有必要知道AccoreConsole几个可选参数： 可选参数 功能 /i 输入需要操作的图纸所在路径 /s 操作脚本所在路径 /l 指定某语言版本的AccoreConsole /isolate 防止影响AutoCAD本身的系统变量 Acco
用批处理来提取文件夹名名称将其前六位作为前缀重命名文件夹内文件
打杂人
09-22 4480
用批处理来提取文件夹名名称将其前六位作为前缀重命名文件夹内文件 文件结构如下:  批处理代码如下 @echo off&setlocal enabledelayedexpansion for /f "delims=" %%c in ('dir /b /ad') do (    pushd "%%c"    set ".=%%
自动提取当前文件夹中所有文件名或包含指定字符串的文件名
wangchenxue的博客
05-13 2188
问题描述 自动提取当前文件夹中所有文件名或包含指定字符串的文件名。 解决方法 step1：显示当前文件夹中所有文件的扩展名，该步骤也可省略；step2：在当前文件夹下建立一个.txt的文本文档，文件名称随意，如extract.txt；step3：在extract.txt文档中输入dir *.*/b>file.txt并保存；注意：dir和*之间要有空格，file.txt名称随意；step4：修改extract.txt文件扩展名，改成extract.bat；step5：双击运行extract.bat文.
xxxxdfgfdgfdgd
最新发布
07-14
xxxxdfgfdgfdgd
使用AUTOCAD ActiveX 接口 获取CAD对象三维坐标
07-17
要使用 AutoCAD 的 ActiveX 接口获取 CAD 对象的三维坐标，您可以按照以下步骤进行操作： 1. 首先，确保您已经安装了 AutoCAD 软件，并且启用了其 ActiveX 接口。 2. 在 Visual Studio 中创建一个 C# 应用程序的项目。 3. 在项目中添加对 AutoCAD COM 接口的引用。这通常可以通过右键单击项目，选择 "添加引用"，然后在 COM 选项卡中找到 AutoCAD COM 接口。 4. 在代码中，使用 AutoCAD.Application 类创建一个 AutoCAD 实例，并连接到 AutoCAD 软件。例如： ```csharp using AutoCAD; // 创建 AutoCAD 实例 AutoCAD.Application acadApp = new AutoCAD.Application(); // 连接到 AutoCAD 软件 acadApp.Visible = true; ``` 5. 获取要获取坐标的 CAD 对象，并获取其三维坐标。具体的方法和属性取决于您所使用的 AutoCAD 版本和其提供的 ActiveX 接口。您可以查阅 AutoCAD ActiveX 接口的 API 文档来了解更多详细信息。 例如，如果您想获取当前选择对象的坐标，您可以使用类似以下的代码： ```csharp AutoCAD.SelectionSets selectionSets = acadApp.ActiveDocument.SelectionSets; AutoCAD.SelectionSet selectionSet = selectionSets.Item("MySelectionSet"); foreach (AutoCAD.Entity entity in selectionSet) { if (entity.EntityName == "AcDbPoint") { AutoCAD.Point point = (AutoCAD.Point)entity; double x = point.X; double y = point.Y; double z = point.Z; Console.WriteLine($"X: {x}, Y: {y}, Z: {z}"); } } ``` 请注意，这只是一个示例，具体的实现方式可能因不同的 AutoCAD 版本而异。您需要根据您使用的 AutoCAD ActiveX 接口的 API 来确定正确的方法和属性。 希望这些信息对您有帮助！如有任何进一步的问题，请随时提问。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值