请教视口视口比例设置及获取

xzd716 · 发表于 2021-6-30 16:09

视口解锁可通过Lisp Mview命令。

xzd716 · 发表于 2021-6-30 16:18

但设置比例无法成功，请各位老师诊断下，谢谢！

xzd716 · 发表于 2021-6-30 16:31

(setq bl (getreal "\n输入视口设置比例：")) (setq OBJECTS (ssget "x" '((0 . "viewport")))) (setq ENT (entget (ssname OBJECTS 0))) (command "mview" "l" "off" ent "") (setq xbl (* bl (cdr(assoc 41 ent)))) (setq ent1 (subst (cons 45 xbl) (assoc 45 ent) ent)) (entmod ent1)

xzd716 · 发表于 2021-7-3 10:58

会设置视口比例的老师们，请指教！

dingtiedt · 发表于 2023-11-9 14:13

本帖最后由 dingtiedt 于 2023-11-9 14:34 编辑

gaics 发表于 2021-6-25 14:31
自定义比例：(vla-get-customscale(vlax-ename->vla-object(car(entsel))))
标准比例：(vla-get-standards ...

vla-get-standardscale，既然说"standard"，应该是“标准”的吧

三种情况：

一，standard的值非1（standard2的值等于standard的值），得到的数值，就是“比例列表”的第几行的比例

例如：       5, 就是比例列表的第5行，即"1:5"

            14，就是比例列表的第14行，即"1:100"

二，standard的值是1，standard2的值非1，则仍为"比例列表"的第几行的比例，此时的比例值为自定义比例

例如：       10，就是比例列表的第10行，即"1:27"；"1:27"为自定义比例，非初始的标准比例，定为了standard2

三，standard和standard2的值均为1，则要通过计算，因为"比例列表"中没有此比例

e:\scalelistMJ.jpg

gaics · 发表于 2023-11-10 08:44

dingtiedt 发表于 2023-11-9 14:13
vla-get-standardscale，既然说"standard"，应该是“标准”的吧

三种情况：

厉害了！之前还真没搞懂。

zilong136 · 发表于 2024-4-1 08:48

本帖最后由 zilong136 于 2024-4-1 09:02 编辑

KO你发表于 2021-6-26 20:42
快捷键 sv 视口比例
(defun c:sv (/ bl)
(if (setq bl (getreal "\n视口比例1:"))

这个很实用，感谢大佬。

zilong136 · 发表于 2024-4-1 08:54

xzd716 发表于 2021-6-30 16:31
(setq bl (getreal "\n输入视口设置比例：")) (setq OBJECTS (ssget "x" '((0 . "viewport")))) (setq ENT ...

输入比例之后就结束了，不能去选择视口。

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

[提问] 请教视口视口比例设置及获取

本帖子中包含更多资源