The Courage Dog 发表于 2022-7-6 11:29:23

; 错误：没有函数定义

您好，我正在尝试加载一个简单的例程来重命名布局以匹配图纸图形文件名。不幸的是，它不能正常工作，它说：错误：没有函数定义：VLAX-GET-ACAD-OBJECT
 
这是Lisp程序。
 
（定义c:rname（/lay layo dwgn）
（setq layo（vla get layouts（vla get activedocument（vlax get acad object）））
（如果（=（vla get name（setq lay（vla item layo）））“模型”）
（setq lay（vla项目layo 1）））
（vla put name lay（substr（setq dwgn（getvar“dwgname”））1（-strlen dwgn）4）））
)
 
 
我曾在2007年使用过它，但在2008年和2010年版本的autocad中没有。

alanjt 发表于 2022-7-6 11:56:56

在（定义c：rname（/lay layo dwgn）之后添加（vl load com）

The Courage Dog 发表于 2022-7-6 12:16:14

很好，谢谢allanjt

alanjt 发表于 2022-7-6 12:47:21

好交易。
不客气。
页: [1]
查看完整版本: ; 错误：没有函数定义