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

[xyzzy:03323] Re: (質問) 半角カナ→全角カナを自動で行う方法



谷藤 浩之 <tanihiro@xxxxxxxxx> さん、こんにちは。masahito です。

|【(質問)半角カナ→全角カナを自動で行う方法】についてメールします。

ヒントだけですが・・・m(_ _)m

lispディレクトリのapp-menu.lを見るとメニューが、どの関数を呼んで
いるかわかります。

	    (:popup nil "全角 -> 半角(&H)"
	     (:item nil "すべて(&A)"
	      'map-to-half-width-selection :selection)
	     (:item nil "英数・ひらがな(&R)"
	      'map-ascii-and-hiragana-to-half-width-selection :selection)
	     (:item nil "英数・カタカナ(&T)"
	      'map-ascii-and-katakana-to-half-width-selection :selection)
	     (:item nil "英数(&N)"
	      'map-ascii-to-half-width-selection :selection)
	     (:item nil "ひらがな(&H)"
	      'map-hiragana-to-half-width-selection :selection)
	     (:item nil "カタカナ(&K)"
	      'map-katakana-to-half-width-selection :selection))
	    (:popup nil "半角 -> 全角(&Z)"
	     (:item nil "すべて(カナ -> ひらがな)(&R)"
	      'map-to-full-width-hiragana-selection :selection)
	     (:item nil "すべて(カナ -> カタカナ)(&T)"
	      'map-to-full-width-katakana-selection :selection)
	     (:item nil "英数(&N)"
	      'map-ascii-to-full-width-selection :selection)
	     (:item nil "カナ -> ひらがな(&H)"
	      'map-kana-to-full-width-hiragana-selection :selection)
	     (:item nil "カナ -> カタカナ(&K)"
	      'map-kana-to-full-width-katakana-selection :selection))

                   ↑
        これですかね?

(map-kana-to-full-width-katakana-selection)とかで呼ぶとか・・

------------------------------------------------------------
逸見雅人    Masahito Henmi  henmi@xxxxxxxxxxxxx
♪あなたの願いも仕事もうまくいきますように・・・

Index Home