[编程申请]：求助人个倒圆角的程序，要求正常的圆角反过来!

li_seagull · 发表于 2004-12-23 13:02:21

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

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

×

求助人个倒圆角的程序，要求正常的圆角反过来!

archqy · 发表于 2004-12-25 14:46:23

用j连接不就可以了？？

xyp1964 · 发表于 2004-12-25 17:03:31

2004测试通过。
[php]
(defun c:test026 (/ s1 s2 s3 pt1 pt2)
  (vl-load-com)
  (vl-cmdf ".undo" "BE")
  (setq no1 (ureal 1 "" "\n半径" no1)
s1  (entsel "\n选择第一条线 : ")
s2  (entsel "\n选择第二条线 : ")
  )
  (setvar "FILLETRAD" no1)
  (command "FILLET" s1 s2)
  (setq s3 (entlast))
  (setq pt1 (vlax-curve-getstartPoint s3)
pt2 (vlax-curve-getEndPoint s3)
  )
  (command "MIRROR" s3 "" pt1 pt2 "y")
  (vl-cmdf ".undo" "E")
  (princ)
)[/php]

zxcvbnm-cad · 发表于 2005-1-4 09:38:32

在三维图型能用就更好了

xiahwan · 发表于 2007-6-13 15:09:26

怎么不能在CAD2005里运行

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

[编程申请]：求助人个倒圆角的程序，要求正常的圆角反过来!

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

相关帖子

浏览过的版块