Emacs font sizing with Ctrl key and mouse scroll

Question

notepad++ allow me to increase the font size when I hold the Ctrl Key and rotate the mouse middle scroll button to forward.

In the same way, the when I ho

Answer 1

Theoretically I can give you the answer to this, but someone more skilled than me is going to have to write the lisp I'm just a little to busy atm to figure it out for myself.

If nobody responds by tomorrow I'll hit the books and figure it out.

What needs to be done: Write a function (font-big) which does this:

1. font-default-size = font-default-size+1`

2. Then re-evaluate all open buffers.

Then Bind the function to a key (define-key map [C-wheel-up] 'font-big)

Then do the same for (font-small).

I hope I get at least partial credits for the idea :)