[LISP程序]：我想编个这样的程序！高手们进来看看

userzhluserzhl

打开CAD后，加载我的VXL中，自动把打印样式和样板文件加到支持路径中：
[HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R16.1\ACAD-301:804\Profiles\<<未命名配置>>\General]
"SheetSetTemplatePath"="C:\\Program Files\\(我的程序的路径)"
"PrinterStyleSheetDir"="C:\\Program Files\\(我的程序的路径)"
"PrinterConfigDir"="C:\\Program Files\\(我的程序的路径)"
"TemplatePath"="C:\\Program Files\\(我的程序的路径)"
退出CAD后就恢复原来的样式。
哪们高手能指点一下？
例：
(defun c:WR(/ s)
  (setq s "5a 00 00 00")
  (vl-registry-write "HKEY_CURRENT_USER\\software\\aa\\a1" "a1" s)
)

yy99

不懂！我也在学习中！

userzhluserzhl

晓东里的高手全都到哪去了呢，这不是学习的地方吗？

雨箭风刀

setenv

lijiao

前面部分很好办，后面要求“退出CAD后就恢复原来的样式”，比较难。

userzhluserzhl

前面部分怎么弄呢？是不是用反应器？楼上可不可以写出来让大家学习学习。

iVox

我估计AutoCAD启动参数可以帮到你。
可以的话，你只需要用不同的快捷图标启动AutoCAD就行了，甚至根本不必编程。

通过自定启动参数，你可以指定单个进程中AutoCAD需要的路径、配置等参数。
具体用法请查看Help中的Customize Startup。


如果你用XP等支持多用户的系统，还有个办法可能也有帮助——

因为AutoCAD是各个用户都有自己的配置，所以你可以根据自己的需要，建立多个用户，每个用户用一套配置。
然后，在启动AutoCAD的时候，用Shift+右键点击，再选择“运行方式...”，再选择你要使用的用户（配置）就行了。

以上两个方法我只是想到有可能，没有经过实验。