掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
カナ入力について (ID:7476)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
なるほど、ImmGetConversionStatusで取得できるのであれば、ImmSetConversionStatusで設定出来そうですね。 # Mr.XRAYさんが紹介されたURLにあるGetInputModeを使用しています procedure SetInputMode(const winctr :TWinControl; Mode: TImeInputMode); var Imc:HIMC; dwConversion : DWORD; dwSentence : DWORD; begin winctr.SetFocus; Imc := ImmGetContext(winctr.Handle); ImmGetConversionStatus(Imc,dwConversion,dwSentence); If (dwConversion And IME_CMODE_ROMAN) = IME_CMODE_ROMAN Then begin //ROMAN if Mode = HIRA then begin dwConversion := dwConversion and (not IME_CMODE_ROMAN); ImmSetConversionStatus(Imc, dwConversion, dwSentence); end; end else begin //HIRA if Mode = ROMAN then begin dwConversion := dwConversion or IME_CMODE_ROMAN; ImmSetConversionStatus(Imc, dwConversion, dwSentence); end; end; ImmReleaseContext(winctr.Handle, Imc); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.