lisp中如何将自定义的TableStyle样式设置为当前样式

ljxkm · 发表于 2013-5-6 12:47

编程需要，最近研究CAD TableStyle对象，查找网站上资料：

(setq ACTDOC (vla-get-activedocument (vlax-get-acad-object)))
  (setq DICT (vla-get-dictionaries ACTDOC))
  (setq TABLESTYLE (vla-item DICT "ACAD_TABLESTYLE"))
  (setq STYLE (vla-addobject TABLESTYLE "USER" "AcDbTableStyle"))
运行代码后
command:"tablestyle"进入，有"standard"与"USER"两个表格样式，如何将“USER”样式设为当前样式，还请各位帮助，先谢过了。

Gu_xl · 发表于 2013-5-6 13:43

(setvar 'CTABLESTYLE "USER")

ljxkm · 发表于 2013-5-6 13:59

感谢老兄啊

ljxkm · 发表于 2013-5-6 14:01

你不说，我怎么也找不到这个变量

ashleytgg · 发表于 2016-6-12 15:24

感谢各楼主的指点

账号		自动登录	找回密码
密码			注册

[讨论] lisp中如何将自定义的TableStyle样式设置为当前样式

相关帖子