[求助]在程序中如何获得一直线的线性/linetype?

shicai · 发表于 2002-8-27 08:28:00

shicai · 发表于 2002-8-28 12:15:00

陈伯雄 · 发表于 2002-8-27 08:38:00

shicai · 发表于 2002-8-27 09:38:00

陈伯雄 · 发表于 2002-8-27 10:49:00

wy · 发表于 2002-8-27 17:03:00

哪位高手能给我推荐一个软件，能实现CATIA V5实体与AutoCAD 2000实体的转换.非常感谢！

shicai · 发表于 2002-8-28 07:47:00

转抄试的步骤:
(setq a (entsel))
提示"Select Object:" clicked a line
(cdr (assoc 6 (entget (car a))))
提示"nil"
但

cdr (assoc 0 (entget (car a))))
提示"LINE"
(cdr (assoc 8 (entget (car a))))
提示"External" 何故?

龙龙仔 · 发表于 2002-8-28 07:55:00

(DEFUN C

_TYPE (/ LL LLL)
  (SETQ LL (ENTGET (CAR (NENTSEL))))
  (IF (NOT (SETQ LLL (CDR (ASSOC 6 LL))))
(SETQ LLL (CDR (ASSOC 6 (TBLSEARCH "LAYER" (CDR (ASSOC 8 LL))))))
  )
  (PROMPT (STRCAT "\n所选线型为: " LLL))
  (PRINC)
)

陈伯雄 · 发表于 2002-8-28 08:50:00

陈伯雄 · 发表于 2002-8-28 08:51:00

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

[求助]在程序中如何获得一直线的线性/linetype?

陈兄, 您是否故弄玄虚呀? 直线的线性怎么会是 nil?

(Cdr (Assoc 6 (EntGet 直线图元名)))，nil=ByLayer

试了不行, AutoCAD反应: bad argument type...

怎样试的？？？？？？？

关于CATIA实体与AutoCAD实体的转换问题

转抄试的步骤: (setq a (entsel))...

所选线型为:

这结果是正确的呀，没有您说的“反应”呀...

这与直线线形有什么关系呢？