emacs放大/缩小

Question

有没有办法在emacs上放大和缩小(动态地改变字体大小,非常顺利)？

Answer 1

尝试C-x C-+并且C-x C--; 也就是说,Control- x Control- Minus/ Control- Plus.

在一个组合(C-x C-+或C-x C--)之后,成功+或-增加或减少文本比例而无需C-x C-再次键入.

萨瓦加入

我查找了分配给上述键的功能,发现它们是text-scale-increase和text-scale-decrease.我将以下内容添加到配置文件中,以便我可以执行Ctrl+ Scroll放大/缩小.它是有益的.

(global-set-key [C-mouse-4] 'text-scale-increase)
(global-set-key [C-mouse-5] 'text-scale-decrease)

如果你事先知道你想要什么，你也可以调用`(text-scale-set LEVEL)`。例如，我默认使用它来减小 ibuffer 中的字体大小：`(add-hook 'ibuffer-mode-hook 'my-ibuffer-mode-hook) (defun my-ibuffer-mode-hook () (text-规模集-1))` (2认同)
Sawa的上/下滚轮命令某种程度上对我不起作用，但是这个命令可以：`（global-set-key（kbd“ C- <wheel-up>”）'text-scale-increase）``（global-设置键（kbd“ C- <wheel-down>”）'text-scale-decrease' (2认同)

Answer 2

user173973的非常好的答案是将函数绑定到非通用鼠标事件.也就是说,例如在我的Windows系统上,绑定命令无效.

要在Windows(或可能在任何地方)使用它,您可以使用这些通用绑定:

(global-set-key [C-mouse-wheel-up-event]  'text-scale-increase)
(global-set-key  [C-mouse-wheel-down-event] 'text-scale-decrease)

我现在已经知道了,从Xah Lee的博客,我用`(kbd"<C-wheel-up>")成功了.特别是,用`Ch k ctrl + scroll-up`描述键. (2认同)