CAD设计论坛

 找回密码
 立即注册
论坛新手常用操作帮助系统等待验证的用户请看获取社区币方法的说明新注册会员必读(必修)
查看: 2294|回复: 14

[求助] 怎样同时缩放多个对象

[复制链接]
发表于 2008-4-18 22:27 | 显示全部楼层 |阅读模式
画了很多个圆,需要同时变大,怎么办呀,谢了
发表于 2008-4-18 22:39 | 显示全部楼层
SC缩放,选中所有对象一起放大
 楼主| 发表于 2008-4-18 22:41 | 显示全部楼层

回复 #2 飞渡 的帖子

那位置就变了吧,我想位置不变的
发表于 2008-4-18 23:33 | 显示全部楼层
找一个公共的点!!!!!!!!!
发表于 2008-4-19 09:32 | 显示全部楼层
如果圆的直径是一样大,可以在特性里面改半径或直径/ s8 C; i! u  u2 t4 r+ ^; f) P7 ^
7 \2 d1 g2 t" k6 x- |# m+ O# H
圆的直径不一样就不知道怎么办了
发表于 2008-4-19 10:24 | 显示全部楼层
楼主的意思是同一比例缩放所有圆,而且是以各自的圆心为基点进行缩放...............
# s- j  O* D+ g' N* J: |- S/ e5 N+ ?: n! G1 \# ]9 n0 G
估计cad还没有这个能力实现
发表于 2008-4-19 16:44 | 显示全部楼层
CAD目前还没有这个功能吧1!~~~7 [1 x) F( V) W
我是没发现 我也经常用到
- E/ R: Y' C4 T% A' n吧书都翻烂了·~~~没找到~·  m  @; o5 F) F: k6 K
上网查  也没又·~
发表于 2008-4-20 23:38 | 显示全部楼层
写一个程序就可以实现呀,很简单呀
发表于 2008-4-20 23:45 | 显示全部楼层
给你一个人家写的,放到cad安装目录下加载后可用,命令为bj7 h9 ~2 ^0 }( H& w- T& H
;;可改圆的半径或比例缩放
% {: f7 T8 |' B$ g+ M(defun C:bj (/ SSET SC SC1 SSLEN NT)
% n& @+ p" e8 Z$ l(while (= SSET NIL)7 a1 }5 R- N) C$ Z& Z, L1 X$ `9 l
(prompt "\n选择要修改的圆:")
6 V# c1 t! x* ~(setq SSET (ssget '((0 . "CIRCLE"))))
  o; `' X3 D" L' \/ d0 |* w)% f5 m9 o. Y3 ~' ?: a3 h7 g  d
(setq SC (getstring "\n输入半径(R)/<缩放比例>: "))  x7 g! ]' R7 y
(if (= SC "")
+ T8 k7 o+ n+ l+ F(setq SC (getreal "\n缩放比例: "))& {: X$ i  S8 h' M7 y1 W6 V) @
(setq SC1 (getreal "\n输入半径: "))
' J9 a7 A+ o& U$ U0 B% z5 e% h, k)
5 {- h5 {; @3 c. u) C+ k3 F8 L, a(setq SSLEN (sslength SSET))
% m" U! e3 }, S- b4 r! M(while (> SSLEN 0)
8 t9 P# X0 }$ k' _- |) c! U$ j(setq ENT (entget (ssname SSET (setq SSLEN (1- SSLEN)))))- a0 B& Z4 k" f& F3 v2 p5 d+ W
(if (= SC1 NIL)
+ r9 N0 Z: L! G- \- y/ Z# K( o(setq NT (* SC (cdr (assoc 40 ENT))))
+ A! b1 Q; G( _& ?& k: W  k7 u(setq NT SC1)
. |0 ?% [( |' b9 L)8 l& M' @# O' o& U
(entmod (subst (cons 40 NT) (assoc 40 ENT) ENT))$ z8 Z  p. f0 v4 }, c
)
- j3 W2 D' o# p( |7 L2 e' ^  q(princ)% h: m6 E8 _, I' \2 Z
)
发表于 2008-4-20 23:50 | 显示全部楼层
做成块,然后用属性刷~
发表于 2008-5-5 17:06 | 显示全部楼层
学习中,路过看看!
发表于 2008-5-5 17:40 | 显示全部楼层
不知道你放大的作用是什么,不过你可以试试鼠标滚轮。
发表于 2008-5-5 19:35 | 显示全部楼层
高手,果然有高手.这事有意义.....
发表于 2008-5-5 20:36 | 显示全部楼层

回复 #9 luyu9635 的帖子

不错..不过..不太行啊.
, s, L6 S! ]( z  o% r, L) U" L' `# ^只能对其中一个圆有用...
发表于 2008-5-5 22:22 | 显示全部楼层
学习一下啊!还是有高人
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于|免责|隐私|版权|广告|联系|手机版|CAD设计论坛

GMT+8, 2025-2-19 06:16

CAD设计论坛,为工程师增加动力。

© 2005-2025 askcad.com. All rights reserved.

快速回复 返回顶部 返回列表