窗口

刚启动时，emacs 都是只有一个 frame 一个窗口。多个窗口都是用 分割窗口 的函数生成的。分割窗口的内建函数是 split-window 。这个函数的参数如下：

(split-window &optional window size horizontal)

这个函数的功能是把当前或者指定窗口进行分割：

• 默认分割方式是 水平分割 ，可以将参数中的 horizontal 设置为 non-nil 的值，变成垂直分割
• 如果不指定大小，则分割后两个窗口的大小是一样的

分割后的两个窗口里的缓冲区是 同一个缓冲区 。使用这个函数后， 光标仍然在原窗口 ，而返回的 新窗口对象 ：

(selected-window)                       ; => #<window 136 on *scratch*>
(split-window)                          ; => #<window 138 on *scratch*>

窗口的分割也需要用 树的结构 来看分割后的窗口，比如这样一个过程：

+---------------+         +---------------+
|               |         |      |        |
| win1          |         | win1 | win2   |
|               |   -->   |      |        |
|               |         |      |        |
|               |         |      |        |
+---------------+         +---------------+
				 |
				 v
+---------------+         +---------------+
| win1   |      |         |       |       |
|        | win2 |         | win1  | win2  |
|--------|      |   <--   |-------|       |
| 3 | 4  |      |         | win3  |       |
|   |    |      |         |       |       |
+---------------+         +---------------+

可以看成是这样一种结构：

(win1) ->  (win1 win2) -> ((win1 win3) win2) -> ((win1 (win3 win4)) win2)

事实上可以用 window-tree 函数得到当前窗口的结构，如果忽略 minibuffer 对应的窗口，得到的应该类似这样的一个结果：

(nil (0 0 170 42)
     (t (0 0 85 42)
        #<win 3>
        (nil (0 21 85 42) #<win 8> #<win 10>))
     #<win 6>)

window-tree 返回值:

• 第一个元素代表 子窗口的分割方式 ：
  • nil : 水平 分割
  • t : 垂直 分割
• 第二个元素代表 整个结构的大小
  • 这四个数字可以看作是 左上 和 右下 两个顶点的坐标
• 其余元素是 子窗口
  • 每个子窗口也是同样的结构

所以把前面这个列表还原成窗口排列应该是这样：

 (0,0) +-------------------+
       |         |         |
       | win 3   |  win6   |
       |         |         |
(0,21) |---------|         |
       |    |    |         |
       | 8  | 10 |         |
       |    |    |         |
       +-------------------+ (170, 42)
	       (85, 42)

注意：由 window-tree 返回的结果一些窗口的大小不能确定， 比如：上面的 win 8 和 win 10 只能知道它们合并起来的大小，不能确定它们分别的宽度是多少

• 如果要让一个窗口不显示在屏幕上，要使用 delete-window 函数，删除的窗口多出来的空间会自动加到它的邻接的窗口中：
  • 如果没有指定参数，删除的窗口是 当前选中的窗口
  • 如果指定了参数，删除的是 这个参数对应的窗口
• 如果要删除除了当前窗口之外的窗口，可以用 delete-other-windows 函数

(setq foo (selected-window))            ; => #<window 90 on *scratch*>
(delete-window)
(windowp foo)                           ; => t
(window-live-p foo)                     ; => nil

当一个窗口不可见之后，这个窗口对象也就消失了

窗口配置包含了 frame 中所有窗口的位置信息：窗口 大小 ， 显示的缓冲区 ，缓冲区中 光标的位置 和 mark ，还有 fringe ， 滚动条 等等：

• 用 current-window-configuration 得到当前窗口配置
• 用 set-window-configuration 来还原

可以用 selected-window 得到当前光标所在的窗口

(selected-window)                       ; => #<window 104 on *scratch*>

用 select-window 函数使某个窗口变成选中的窗口

(progn
  (setq foo (selected-window))
  (message "Original window: %S" foo)
  (other-window 1)
  (message "Current window: %S" (selected-window))
  (select-window foo)
  (message "Back to original window: %S" foo))

两个特殊的宏可以保存窗口位置执行语句，它们的作用是在 执行语句结束 后 选择的窗口 仍留在 执行语句之前的窗口 ：

• save-selected-window：可以选择其它窗口
• with-selected-window: 选择当前的窗口

;; 让另一个窗口滚动到缓冲区开始
(save-selected-window
  (select-window (next-window))
  (goto-char (point-min)))

这两个宏不会保存窗口的位置信息，如果执行语句结束后，保存的窗口已经消失，则会选择最后一个选择的窗口

当前 frame 里所有的窗口可以用 window-list 函数得到

• 用 next-window 来得到在 window-list 里排在某个 window 之后的窗口
• 用 previous-window 得到排在某个 window 之前的窗口

(selected-window)                       ; => #<window 245 on *scratch*>
(window-list)
;; => (#<window 245 on *scratch*> #<window 253 on *scratch*> #<window 251 on *info*>)
(next-window)                           ; => #<window 253 on *scratch*>
(next-window (next-window))             ; => #<window 251 on *info*>
(next-window (next-window (next-window))) ; => #<window 245 on *scratch*>

• walk-windows 可以遍历窗口，相当于 (mapc proc (window-list))
• get-window-with-predicate 用于查找符合某个条件的窗口

Next：文件

Previous：窗口

TOP：操作对象