一次 Entmod 多个属性

Free-Lancer · 发表于 2013-6-5 07:37:25

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由 Free-Lancer 于 2013-6-5 13:36 编辑

[pcode=lisp,true](defun XD::OBJ:Entmod (el lst)
  (while lst
(if (assoc (car lst) el)
   (setq el (subst (cons (car lst) (cadr lst))
      (assoc (car lst) el)
      el
      )
   )
   (setq el (append el (list (cons (car lst) (cadr lst))))) ;_没有的组码要附加到最后
)
(setq lst (cddr lst))
  )
  (entmod el)
)[/pcode]

hhhlike · 发表于 2013-6-5 07:49:27

第一次抢到沙发:)
这个函数很实用!

pzweng · 发表于 2013-6-5 07:54:21

干嘛不用mapcar
(mapcar 'entmod enamelst)

GTJ116600 · 发表于 2013-6-5 09:00:43

没沙发，没地板，站着看也高兴

Lispboy · 发表于 2013-6-5 09:44:43

XDRX_API里面的XDRX_MODENT函数的LISP实现，我看看能完善下代码不。感觉名字叫 XD::OBJ::EntMod 比较好，因为不只是能修改实体，对象都能修改。

QiaoCheng · 发表于 2013-6-5 10:11:30

这些函数能不能汇总置顶放在一起啊？不然太多了

牢固 · 发表于 2013-6-5 10:28:49

QiaoCheng 发表于 2013-6-5 10:11
这些函数能不能汇总置顶放在一起啊？不然太多了

点击论坛上面的函数发布分类，就可以将所有的函数发布帖子集中到一起浏览了！

登录/注册后可看大图

QiaoCheng · 发表于 2013-6-5 10:30:46

排在后面翘起头拼命拍手

Free-Lancer · 发表于 2013-6-5 13:05:20

Lispboy 发表于 2013-6-5 09:44
XDRX_API里面的XDRX_MODENT函数的LISP实现，我看看能完善下代码不。感觉名字叫 XD::OBJ::EntMod 比较好，因 ...

在 Alisp 中习惯叫 Entity，在 Vlisp 中用 Object，而 Object 是不能用 Entmod，这个对应的是 Entity，我觉得如果参数用 Object 的时候可以使用 XD::OBJ前缀，这样也有个区别，那些是纯Alisp，那些要用 Vlisp 方法、属性

Lispboy · 发表于 2013-6-5 13:30:59

Free-Lancer 发表于 2013-6-5 13:05
在 Alisp 中习惯叫 Entity，在 Vlisp 中用 Object，而 Object 是不能用 Entmod，这个对应的是 Entity，我 ...

我觉得既然写通用的函数库，就不管是ALISP还是VLISP，（通用函数库是个黑盒子，用户不关心里面是ALISP还是VLISP实现的。给出来盒子的接口就够了。）都应该按ACAD的对象数据库文档来，不能因为VLISP叫OBJ了，其他的就不能叫了。VLA的OBJ和文档里面的OBJECT不是一个东西。

因为这个函数是可以修改任何entget 得到的对象的数据的，只叫Ent有点对不上ARX的文档，叫OBJ能说明对层表、词典那些非显示的对象也可以适用。

因为以后还有很多只适合OBJ的函数要写。

一家之言，呵呵。

Free-Lancer · 发表于 2013-6-5 13:38:11

Lispboy 发表于 2013-6-5 13:30
我觉得既然写通用的函数库，就不管是ALISP还是VLISP，（通用函数库是个黑盒子，用户不关心里面是ALISP还 ...

改成和 Alisp 函数一致的名称了

liuchong1988 · 发表于 2014-10-18 18:22:53

这个函数很实用!

st788796 · 发表于 2014-10-18 21:49:07

object 对象，面向对象

wzg356 · 发表于 2014-10-19 15:37:03

不会游泳，却见了海洋

lliushaojiang · 发表于 2014-10-24 00:34:19

好东西，值得分享

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

[选择集] 一次 Entmod 多个属性

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

评分

点评

点评

点评

点评