KO你 发表于 2019-6-16 01:04:20

图纸空间 视口进出

本帖最后由 KO你 于 2019-6-16 01:14 编辑

快捷键sf视口空间进出
(defun c:sf () (command"mspace"))；空格一次进入视口
                     (command"pspace"))；空格二次退出视口

怎样实现同个命令，输入命令空格一次与两二次的切换。

e2002 发表于 2019-6-16 01:04:21

本帖最后由 e2002 于 2019-6-16 21:57 编辑

这种简单程序就不要收币吧？
;; Switch layout mspace/pspace

;; Rev:
;; 0.0.1      :2019/06/16      :InitVersion

(defun C:lkpt_Layout_SpaceSwitch (/ sCmd sSpace oldvar)
(if (= (getvar "TILEMODE") 0)
    (progn
      (if (> (getvar "CVPORT") 1)
      (setq sCmd "_.pspace"
            sSpace "\nYou are in layout Pspace now!"
      )
      (setq sCmd "_.mspace"
            sSpace "\nYou are in layout Viewport_MSpace now!"
      )
      );;_fi
      (setq oldvar (getvar "CMDECHO"))
      (setvar "CMDECHO" 0)
      (vl-cmdf sCmd)
      (princ sSpace)
      (setvar "CMDECHO" oldvar)
    );;_progn
    (princ "\nYou are in Model!")
);;_fi
(princ)
);;_defun

e2002 发表于 2019-6-16 20:51:07

你要的是个切换程序。

KO你 发表于 2019-6-16 20:54:34

e2002 发表于 2019-6-16 20:51
你要的是个切换程序。

对，用空格确定次数来切换，在论坛上我只找到空格一次的切换，没有我想要的效果

satan421 发表于 2019-6-16 21:52:15

本帖最后由 satan421 于 2019-6-16 21:58 编辑

;;你也可以说，这么简单就不要提问了

sj800918 发表于 2019-10-23 16:58:26

不理解为什么需要这个功能

圣天诺杰 发表于 2019-10-23 19:42:19

e2002 发表于 2019-6-16 01:04
这种简单程序就不要收币吧？

能不能在这基础上增加选择视口进入？

圣天诺杰 发表于 2019-10-25 22:38:41

大视口套小视口，双击进入不如人愿，需要个选择视口进入的功能

ketxu 发表于 2020-1-7 00:00:04

Thanks for sharing ^^

00放飞梦想00 发表于 2020-3-13 20:37:02

循环激活视口直接 Ctrl+R就是不错的选择
页: [1] 2
查看完整版本: 图纸空间 视口进出