复制布局并缩放视口。

Kowal · 发表于 2022-7-5 15:42:42

我有一个布局和一个列表。
布局有一个vieport和其他对象。
列表：名称和坐标

'((name (LowerLeft UpperRight)) (...) (...) ...)

如何使用从列表中获取坐标的缩放窗口复制布局并在vieport中设置视图。
复制布局并重命名：

(command "._layout" "_copy" "old" "new")

(mapcar '(lambda (e) (command "._layout" "_copy" "old" e)) '("1" "2" "3" "4" "5"))

如何放大视口？

BIGAL · 发表于 2022-7-5 16:53:54

我不使用lambda，所以，是的，我知道我应该。


(setq lst (reverse '("1" "2" "3" "4" "5")))
(repeat (setq x (length lst)))
(command "._layout" "_copy" "D01" (nth (setq x (- x 1)) lst))
)

关于视口中的缩放，您需要执行“mspace”，然后执行缩放C比例（如果您知道坐标），然后可能执行缩放比例EXP

[编程交流] 复制布局并缩放视口。