（求助）关于模型选项卡与布局选项卡的切换的编程

fengsea

个人比较习惯在模型空间下画图到布局空间下排版、修改，但查找论坛内没有相类似的编程，而且本人对编程菜鸟一个，望哪位大侠费费心思编一个。

思路是模型选项卡与布局选项卡以命令互相切换，布局选项卡切换到模型选项卡会暂时记录当前布局选项卡，下次想切换到布局选项卡时自动进入上次的布局选项卡内并且如果想去其他布局选项卡的话输入其名称来切换。

fengsea

难道没有人能弄这个吗？？？

sailorcwx

为什么用编程呢，直接用鼠标点下面的选项卡不就可以切换了么，还要输入名称那么麻烦

编程是把复杂的东西简单化，而不应该把简单的东西复杂化了，do remember!

fengsea

由于个人习惯把一个布局一张图，一个文件一套图纸的话不下20多张布局，贪图批打省事，但编辑时就相对的要找哪张图就麻烦了，希望哪位大侠编个LISP。

天龙八部

Tilemode,不能够切换吗? 一般的初学者都认为布局打印,排版比较方便,其实呢?个人感觉布局的功能DESK公司做出来是鸡肋,当然看每个人的习惯,很久之前在模型做图时,布局出现后,感觉挺有用,但当学好编程后,却觉得DESK开发的都是XX

vkzhang

你想要什么功能呢,输入布局名,还是输入布局序号呢?
这样还不如去点选呢

vkzhang

(defun c:2l ()
  (setq layer_list (layoutlist))
  (setq layoutname (getstring "请输入布局名:"))
  (if (member layoutname layer_list)
    (command "layout" "s" layoutname)
    (princ "\n 布局名输入错误!")
  )
  (princ)
)
你看看这个符合你的要求不?

sailorcwx

layout命令就可以啦
(command "layout" "s")
模型空间输入"model"，中文版可以输入"模型",布局空间直接输入布局名称

fengsea

谢谢楼上各位大侠，不过vkzhang兄可能理解错了，我前面可能说得不太清楚，我的要求是在模型选项卡和布局选项卡可互相切换，

举例：假如有几十个布局，当前在模型选项卡内画图完后用此lisp切换到假设名称为1的布局内排版，但是有些漏的东西想回到模型选项卡内修改，可用此lisp再次切换到模型卡内，重点是会暂时记录模型和1的布局卡，不需要重复输入模型和1的卡的名称就可切换；修改名称为1的布局卡完成后，无论是在模型或布局卡内用此lisp只要输入假设名称为30布局就可切换该布局内，但是该30的布局会替换前次1的布局的记忆，这样又可30的布局卡与模型卡互相切换了。

再次麻烦大侠救救俺吧！！！！

fengsea

说得简单点就是Tilemode和layout(command "layout" "s")两个命令融合为一体的lisp的程序