版主能否组织大家开发个“明经CAD工具箱”？

Gu_xl

xyp1964 发表于 2012-4-26 23:54

此函数不严谨，cad实体很多默认组码用entget得到的组码表里不会出现，如颜色62、线型6等等！

1. (defun SubUpd  (ename code newvalue / a el)
   
2.   (if (setq a (assoc code (setq el (entget ename))))
   
3.     (entmod (subst (cons code newvalue)
   
4.                    a
   
5.                    el
   
6.                    )
   
7.             )
   
8.     (entmod (append el (list (cons code newvalue))))
   
9.     )
   
10.   (entupd ename)
    
11.   ename
    
12.   )
    

(defun SubUpd  (ename code newvalue / a el)<br />   (if (setq a (assoc code (setq el (entget ename))))<br />     (entmod (subst (cons code newvalue)<br />                    a<br />                    el<br />                    )<br />             )<br />     (entmod (append el (list (cons code newvalue))))<br />     )<br />   (entupd ename)<br />   ename<br />   )<br />

daiguafan

工具箱啊，还是太多专业，太杂了，不适合

daiguafan

搞通用函数这个建议不错，非常支持啊

tm20038175

小菜123 发表于 2012-4-26 21:45
我就属于代码写得差的，我那个版本的选择易从没人愿意修改点什么，可能差到别人看不懂

飞诗兄就参考了你的选择易，可是他那个不是开源的，不推荐！

cabinsummer

你们折腾去吧！
任何一个工具箱，常用的功能不会超过10个。
开发工具箱，无非是学习、练手而已。

定制才是王道

langjs

小菜123 发表于 2012-4-26 21:45
我就属于代码写得差的，我那个版本的选择易从没人愿意修改点什么，可能差到别人看不懂

大家没提意见是因为程序非常好用实用，操作方便没有多于的功能，我经常用。
已收录到本人自己的《TH++》工具箱中了。谢谢小菜的付出。

xiaxiang

cabinsummer 发表于 2012-4-27 22:07
你们折腾去吧！
任何一个工具箱，常用的功能不会超过10个。
开发工具箱，无非是学习、练手而已。

任何一个工具箱，常用的功能不会超过10个
这个我同意！在一间办公室上班的几个人，需求都不会完全一样的！

xiaxiang

分门别类整理函数库，这个光靠志愿不太现实
建议每人捐助30元。。。

dongya1235

支持啊！！！！！！

zhengchuan

xiaxiang 发表于 2012-4-28 13:35
分门别类整理函数库，这个光靠志愿不太现实
建议每人捐助30元。。。

支持啊！！！！！！