all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Bruce Ingalls <bingalls@SpAmBlOcK.fit-zones.com>
Subject: Re: MS Windows "Alt-Menu" support
Date: Thu, 07 Aug 2003 16:47:02 GMT	[thread overview]
Message-ID: <aovYa.106850$852.53533@twister.nyc.rr.com> (raw)
In-Reply-To: <bgtm0a$5mc$1@home.itg.ti.com>

Javier Oviedo wrote:
> I was given the function below from someone on this newsgroup. I bind this
> function to M-` (Alt-`) and then type the letter of the particular menu item
> to bring that up....arrow keys also work. I hope this is helpful.
> 
> M-` F  ==> File
> M-` E  ==> Edit
> ...
> 
> ;;; Emulate ALT+
> (defun jbr-w32-simulate-Alt-tap ()
>   (interactive)
>   (w32-send-sys-command 61696))
> ;;;

Nice code! I tried to bind it as follows, but could not get it to work:

(defun edit-menu ()
   (interactive)
   (w32-send-sys-command 61696)
   (insert "e")
)

(global-set-key [(meta e)] 'edit-menu)

I also tried (process-send-string nil "e") but nil is not the right process.
I'd also have to figure out how to send a cursor down.
It would also be nice to port this code to Linux.


 >>Obviously Alt-F File, Alt-H Help, etc., conflict with
 >>other Meta key sequences.

So I just make this a M-x customize option.

Note: XEmacs sometimes supports alt- menu key bindings

  reply	other threads:[~2003-08-07 16:47 UTC|newest]

Thread overview: 23+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-08-07  2:21 MS Windows "Alt-Menu" support Herb Martin
2003-08-07 13:44 ` Johan Bockgård
2003-08-08 11:50   ` Herb Martin
2003-08-07 14:03 ` Javier Oviedo
2003-08-07 16:47   ` Bruce Ingalls [this message]
2003-08-07 15:14 ` Peter Lee
2003-08-07 15:27   ` Peter Lee
2003-08-08 19:55     ` danlee
2003-08-08 19:00 ` Kai Großjohann
2003-08-08 20:04   ` Jeffery B. Rancier
2003-08-08 22:01   ` Peter Lee
2003-08-08 23:17     ` Herb Martin
2003-08-09 10:01       ` Kai Großjohann
2003-08-10  3:11         ` lRe: " Herb Martin
2003-08-10 20:22           ` Kai Großjohann
2003-08-11  5:09             ` Herb Martin
2003-08-11  5:13             ` Herb Martin
2003-08-12 18:31               ` Kai Großjohann
2003-08-13  1:08                 ` Herb Martin
2003-08-15 13:07                   ` Kai Großjohann
2003-08-18  6:03                     ` Herb Martin
2003-08-18 11:55                     ` Bruce Ingalls
2003-08-08 23:15   ` Herb Martin

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to='aovYa.106850$852.53533@twister.nyc.rr.com' \
    --to=bingalls@spamblock.fit-zones.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.