线形自动加载

chui · 发表于 2003-5-29 21:24:00

请问各位，我已经编好了线形文件，把它复制到acad.lin文件中，但是每次使用都要打开线形对话框进行加载，请问如何在lisp中写程序自动加载所有已经定义的线形呢？

lzfat · 发表于 2003-5-30 14:35:00

提示: 作者被禁止或删除内容自动屏蔽

meflying · 发表于 2003-5-30 15:00:00

(vl-load-com)
(defun c:loadline(/ adoc msp ltps ltp)
  (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
  (setq ltps (vla-get-linetypes adoc))
  (vla-add ltps "Center")
)
;Center为线型名。

陈伯雄 · 发表于 2003-5-30 16:24:00

chui · 发表于 2003-5-31 22:05:00

本帖最后由作者于 2003-5-31 22:05:46 编辑

我用了这个程序，线形是可以加载了，但是显示的都不是加载的线形呢？都是类世“continuous”的线呢？请在帮助！！

chui · 发表于 2003-6-1 12:32:00

meflying · 发表于 2003-6-2 08:45:00

(vl-load-com)
(defun c:loadline(/ adoc msp ltps ltp)
  (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
  (setq ltps (vla-get-linetypes adoc))
  (vla-load ltps "Center" "acad.lin")
)
;acad.lin装有线型的文件

chui · 发表于 2003-6-2 18:15:00

[此贴子已经被作者于2003-6-2 18:15:54编辑过]

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

线形自动加载

可以

不必在程序中作，使用图形模版技术就很好了...

meflying，加载了线形，外观都是“continuous"样子的！

meflying，需要你的帮助！

不好意思，弄错了

感谢:meflying,问题已经解决!!

lzfat lzfat 当前离线积分 702 明经币个注册时间 2002-4-21 在线时间小时威望金钱个贡献激情	发表于 2003-5-30 14:35:00 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡