恭贺新春-不一样的型钢插入

hf423 · 发表于 2012-6-23 21:10

xingyun300 发表于 2012-6-23 17:02
怎么修改呢，晕了！不是源代码！！！！！

(setvar "peditaccept" 0) 这句怎么加到程序里呢？？ ...

这是我的，给你参考：
(defun c:mycad_315 (/ oldpedita)
(if (null c:xinggangcr)
(progn (load "型材插入.vlx")
            (setq xinggangcr c:css)
            (defun c:xinggangcr ()(xinggangcr))
            (vl-acad-undefun 'c:css)))
            (setq oldpedita (getvar "peditaccept"))
            (setvar "peditaccept" 0)
            (c:xinggangcr)
            (setvar "peditaccept" oldpedita)
(princ))

xingyun300 · 发表于 2012-6-26 10:32

谢谢，有你这个程序，我把这两个整到一起用算了！！！

xingyun300 · 发表于 2012-6-26 10:32

hf423 发表于 2012-6-23 21:10
这是我的，给你参考：
(defun c:mycad_315 (/ oldpedita)
(if (null c:xinggangcr)

谢谢，有你这个程序，我把这两个整到一起用算了！！！

ynhrb · 发表于 2012-8-5 09:51

附件怎么下载不了啦？

守仁格竹GM · 发表于 2012-11-16 15:30

有源码就好了

yangist · 发表于 2013-6-22 16:36

我怎么看不到下载链接~~~~~~~~~~~~~~~~

l18c19 · 发表于 2013-9-2 20:46

程序在哪里，怎么看不见呢？

mjz521yy · 发表于 2014-2-28 12:51

1个是自己做的动态块，1个是机械版CAD自带的图库

zhqdh · 发表于 2014-2-28 19:34

下载链接在哪里？

zwf100 · 发表于 2014-2-28 23:25

高手，向楼主学习

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

[基础] 恭贺新春-不一样的型钢插入