[求助]：有没有这样的裁剪命令

aming800 · 发表于 2006-11-19 18:06:38

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

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

×

请问各位前辈，cad里有没有这样的功能，把一个图裁剪一块，范围外面的都自动不要了，就像photoshop里面的裁剪工具一样？

无影人 · 发表于 2006-11-19 18:18:03

xyp1964 编的自动裁剪就可以.
;;方块修剪
;;用于在某范围内对平面图进行修剪，分割平面图或删除平面图上的某一部分。
(defun c:test056 (/ p1 p2 p3 p4 dst ang p1a p2a p3a p4a lst)
  (CMDLA0)
  (setq p1 (getpoint "\n选择矩形框的第一角：")
p2 (getcorner p1 "\n选择矩形框的另一角：")
  )
  (setvar "osmode" 0)

  (command "rectang" p1 p2)
  (setq lst  (entlast)
txt5 (UKWORD 1 "1 2" "\n请选择清除范围：1-外部/2-内部" txt5)
p3 (list (car p2) (cadr p1))
p4 (list (car p1) (cadr p2))
dst  (/ (distance p1 p2) 100.0)
ang  (angle p1 p2)
  )
  (if (= txt5 "1")
(setq p1a (polar p1 ang (- 0 dst))
   p2a (polar p2 ang dst)
)
(setq p1a (polar p1 ang dst)
   p2a (polar p2 ang (- 0 dst))
)
  )
  (setq p3a (list (car p2a) (cadr p1a))
p4a (list (car p1a) (cadr p2a))
  )
  (command "_.trim" lst "" "f" p1a p3a p2a p4a p1a "" "")
  (if (= txt5 "1")
(command "_erase" "all" "_r" "_c" p1 p2 "")
(command "_erase" "_w" p1 p2 "")
  )
  (CMDLA1)
)

facile · 发表于 2006-11-21 13:08:10

用imageclip命令就行了啊
可以裁减出任意形状

mnyhk · 发表于 2006-11-21 19:16:29

在EXPRESSTOOLS（扩展工具）里面－编辑工具－增强剪切就具有这个功能！

sony123 · 发表于 2006-11-21 19:52:22

2楼提供的程序出错

命令: test056
; 错误: no function definition: CMDLA0

aming800 · 发表于 2006-11-24 18:10:02

我试了，以上的方法都不行啊，是我操作有错误吗？楼上的大侠们能不能说清楚一点啊，谢谢

sony123 · 发表于 2006-11-24 18:33:25

2楼的是程序有问题
3楼的是处理图像
4楼的是不会自动，但是边界处已经打断

wqqqw · 发表于 2006-11-24 22:31:41

楼上的，程式不对呀

aming800 · 发表于 2006-11-27 20:13:50

呵呵，还是没有一个解决的办法啊，继续顶起来

szwcg · 发表于 2006-11-27 20:25:20

可以选定一个范围后，再打断删除呀！

aming800 · 发表于 2006-11-28 20:42:48

难道没有这样的命令吗？我再顶起来，我觉得cad应该会有这样的命令，因为这么成熟一个软件我觉得应该能有这样的基本功能的。有哪位大侠能解开这个疙瘩吗？

aichong · 发表于 2006-11-28 21:30:44

http://www.xdcad.net/forum/showt ... 3092441#post3092441

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

[求助]： 有没有这样的裁剪命令

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

相关帖子

[求助]：有没有这样的裁剪命令