[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:06411] Re: システムメニューのキー設定は?



みなさん、はじめまして。
さわだ といいます。

もう解決してらっしゃるようで、無駄かもしれませんが、
xyzzyにメッセージを送る方向でLisp書いてみました。

xyyzy referenceのその他->C-zでアイコン化させるには?を
参考にしました。(参考というか少し変えただけですが・・)

;;ここから show-xyzzy.l
(provide "show-xyzzy")
(export '(maximize-xyzzy minimize-xyzzy restore-xyzzy))

(require "wip/winapi")
(c:define-dll-entry winapi:BOOL ShowWindow (winapi:HWND c:int) "user32")

(defun maximize-xyzzy () ;;SW_MAXIMIZE
  (interactive)
  (show-xyzzy 3))
(defun minimize-xyzzy () ;;SW_MINIMIZE
  (interactive)
  (show-xyzzy 6))
(defun restore-xyzzy () ;;SW_RESTORE
  (interactive)
  (show-xyzzy 9))
(defun show-xyzzy (style)
  (ShowWindow (get-window-handle) style))

;;ここまで

上のをsite-lispディレクトリにほうりこんで、.xyzzyに
下のように書いておけば、ALT+SPACEを使わずに最大化、最小化、復元できます。
(もちろん、キーはお好みで)

(require "show-xyzzy")
(define-key ctl-x-map #\C-x
	    'maximize-xyzzy)
(define-key ctl-x-map #\C-r
	    'restore-xyzzy)
(global-set-key #\C-z
		'minimize-xyzzy)


--------------------------------
沢田清高  会津大学
s1070113@xxxxxxxxxxxx
--------------------------------

Index Home