かな入力／ローマ字入力　の入力方法をコントロール

サンプル

(2005.05.12)
　 概要

 カナ入力/ローマ字入力の切り換えサンプル

IME 97以前はＡＰＩの ImmSetConversionStatus を使って「かな入力/ローマ字入力」できましたが

MS-IME 98以降では APIによる入力方式の変更は出来ません。
　

　

今回は特殊キーの状態を設定するＡＰＩのkeybd_event を使って可能にしました

　

参考

MS-IME における API による入力方式の変更
http://support.microsoft.com/default.aspx?scid=kb;ja;419357

KANAボタンについて
http://support.microsoft.com/default.aspx?scid=http%3a%2f%2fwww.microsoft.com%2fJAPAN%2fsupport%2fkb%2farticles%2fjp418%2f8%2f68.asp

　 ソース

　


Option Compare Database
Option Explicit

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const VK_KANA = &H15
Const KEYEVENTF_KEYUP = &H2

Private Sub CmdKana_Click()
Call keybd_event(VK_KANA, 0, 0, 0) 'KANA入力
End Sub

Private Sub CmdRoma_Click()
Call keybd_event(VK_KANA, 0, KEYEVENTF_KEYUP, 0) 'ローマジ入力
End Sub






　

　

ここに掲載された情報を使用したことによって発生した、いかなる損害に対しても
管理者であるしゃくは一切責任を負いません。

since 16 APR. 2005 By Shaku