Làm thế nào để đếm tất cả các cửa sổ trong một khung?

Giống như câu hỏi đã nêu, tôi muốn một chức năng sẽ đếm các cửa sổ hiện đang được hiển thị trong khung đó.

Vậy đây:

+--------------+-------------+
|              |             |
|              |             |
|  *scratch*   | *Messages*  |
|              |             |
|              |             |
|              |             |
+--------------+-------------+
|           *Help*           |
|                            |
+----------------------------+

Sẽ trở lại => 3

Tôi đã bắt đầu một chức năng dưới đây:

(defun count-windows ()
  "Count how many buffers are currently being shown."
  (interactive)
)

Nếu bạn có nghĩa là số lượng cửa sổ bất kể bộ đệm nào đang hiển thị, thì: (length (window-list))sẽ làm điều đó. Tốt hơn hết, bạn chỉ có thể sử dụng (count-windows)chức năng hiện có .

Nếu bạn muốn đếm số lượng bộ đệm duy nhất hiển thị trong các cửa sổ trên khung, thì bạn có thể sử dụng:

(length (cl-delete-duplicates (mapcar #'window-buffer (window-list))))

(Lưu ý rằng window-listcũng có thể có một đối số FRAME tùy chọn nếu bạn muốn một cái gì đó ngoài khung đã chọn.)

Kết thúc phần sau trong lệnh gọi hàm của bạn sẽ cung cấp cho bạn:

(defun count-unique-visible-buffers (&optional frame)
  "Count how many buffers are currently being shown.  Defaults to
selected frame."
  (length (cl-delete-duplicates (mapcar #'window-buffer (window-list frame)))))

(Lưu ý rằng chức năng này giả sử bạn đã tải 'cl-lib. Theo nhận xét, bạn có thể sử dụng delete-dupsthay cho cl-delete-duplicatesnếu bạn muốn tránh cl-lib.)