大家好,
我创建了一个lisp程序,它定义了一个名为“ReloadNew”的命令。
它将重新加载一个名为“New_Package”的配置文件。
最近对配置文件进行了一些更改,我希望我的团队中的每个人都重新加载配置文件。因此,由于他们已经将其超现实配置文件设置为“New\u Package”,我认为他们必须将其他一些配置文件设置为当前配置文件,然后再次将“New\u Package”设置为当前配置文件。
还是我在绕圈子?有没有更好的方法来执行此操作,而不必要求他们重新启动AutoCAD?
到目前为止,我在这里。
问题是,当我尝试设置“>”电流时,它显示错误。
- (
- defun c:ReloadNew()
- (vl-load-com)
- (setq acadObject (vlax-get-acad-object))
- (setq prefsObject (vlax-get-property acadObject 'Preferences))
- (setq profileobj (vlax-get-property prefsObject 'Profiles))
- (setq activeprofile (vlax-get-property profileobj 'ActiveProfile))
- (vlax-put-property profileobj '<<Unnamed Profile>>)
- (prompt "Unnamed Profile has been set current.")
- (vlax-put-property profileobj "New_Package")
- (prompt "New_Package Profile has been set current.")
- )
|