; 错误：没有函数定义

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中没有。