[IME.ahk]の変更点 - eamat @Cabinet - atwiki（アットウィキ）

「IME.ahk」(2012/11/13 (火) 19:08:02) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

<div style="font-family:'MS Gothic', monospace;margin-left:0;line-height:130%;"> <table style="border-collapse:collapse;border-width:0;"><tbody><tr><td style="border-style:solid;border-width:0px 1px 0px 0px;padding:3pt;text-align:right;color:#5A4F25;background-color:#FFFCF2;"> 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354</td> <td style="white-space:nowrap;padding:5pt;color:#373737;background-color:#FFFCF2;"> <div style="color:#373737;background-color:#FFFCF2;">/***************************************************************************** IME制御用関数群 (IME.ahk) グローバル変数 : なし 各関数の依存性 : なし(必要関数だけ切出してコピペでも使えます) AutoHotkey: L 1.1.08.01 Language: Japanease Platform: NT系 Author: eamat. http://www6.atwiki.jp/eamat/ ***************************************************************************** 履歴 2008.07.11 v1.0.47以降の関数ライブラリスクリプト対応用にファイル名を変更 2008.12.10 コメント修正 2009.07.03 IME_GetConverting() 追加 Last Found Windowが有効にならない問題修正、他。 2009.12.03 ・IME 状態チェック GUIThreadInfo 利用版入れ込み （IEや秀丸8βでもIME状態が取れるように） http://blechmusik.xrea.jp/resources/keyboard_layout/DvorakJ/inc/IME.ahk ・Google日本語入力β 向け調整 入力モード及び変換モードは取れないっぽい IME_GET/SET() と IME_GetConverting()は有効 2012.11.10 x64 & Unicode対応 実行環境を AHK_L U64に (本家およびA32,U32版との互換性は維持したつもり) ・LongPtr対策：ポインタサイズをA_PtrSizeで見るようにした ;================================== ; GUIThreadInfo ;================================= ; 構造体 GUITreadInfo ;typedef struct tagGUITHREADINFO {(x86) (x64) ; DWORD cbSize; 0 0 ; DWORD flags; 4 4 ※ ; HWND hwndActive; 8 8 ; HWND hwndFocus; 12 16 ※ ; HWND hwndCapture; 16 24 ; HWND hwndMenuOwner; 20 32 ; HWND hwndMoveSize; 24 40 ; HWND hwndCaret; 28 48 ; RECT rcCaret; 32 56 ;} GUITHREADINFO, *PGUITHREADINFO; ・WinTitleパラメータが実質無意味化していたのを修正 対象がアクティブウィンドウの時のみ GetGUIThreadInfoを使い そうでないときはControlハンドルを使用 一応バックグラウンドのIME情報も取れるように戻した (取得ハンドルをWindowからControlに変えたことでブラウザ以外の大半の アプリではバックグラウンドでも正しく値が取れるようになった。 ※ブラウザ系でもアクティブ窓のみでの使用なら問題ないと思う、たぶん) */ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; 動作確認用内部ルーチン (マウスカーソル位置のウィンドウのIME状態を見る) ; 単体起動時のテスト用なので削除しても問題なし <div style="color:#000080;background-color:#EEEEEE;"> _ImeAutoExecuteSample:</div> Hotkey,#1,_ImeGetTest Hotkey,#2,_ImeSetTest Hotkey,#3,_ImeIsConvertingTest Hotkey,+ESC,_ImeTestExt SetTimer,_ImeInfoTimer,ON return ;--- IME状態表示タイマ --- <div style="color:#000080;background-color:#EEEEEE;">_ImeInfoTimer:</div> Tooltip,%"IME_GET : " . IME_GET(_mhwnd()) . "`n" . "IME_GetConvMode : " . IME_GetConvMode(_mhwnd()) . "`n" . "IME_GetSentenceMode : " . IME_GetSentenceMode(_mhwnd()) . "`n" . "IME_GetConverting : " . IME_GetConverting(_mhwnd()) return ;--- IME Get Test [Win]+[1] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeGetTest:</div> MsgBox,%"IME_GET : " . IME_GET(_mhwnd()) . "`n" . "IME_GetConvMode : " . IME_GetConvMode(_mhwnd()) . "`n" . "IME_GetSentenceMode : " . IME_GetSentenceMode(_mhwnd()) . "`n" return ;--- IME Get Test [Win]+[2] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeSetTest:</div> MsgBox,%"IME_SET : " . IME_SET(1,_mhwnd()) . "`n" . "IME_SetConvMode : " . IME_SetConvMode(0x08,_mhwnd()) . "`n" . "IME_SetSentenceMode : " . IME_SetSentenceMode(1,_mhwnd()) . "`n" return <div style="color:#FF0000;background-color:#FFE6EE;">_mhwnd(){ ;background test</div> MouseGetPos,x,,hwnd return"ahk_id" . hwnd } ;------------------------------------------------------------------ ; IME窓のクラス名を調べるテストルーチン ; 入力or変換状態でIme窓にマウスカーソル持ってって [Win]+[3]押す ; Clipboardに Class名がコピーされる。入力窓/候補窓それぞれ調べる。 ; 調べたクラス名は正規表現になおして ; IME_GetConverting("A","入力窓クラス","候補窓クラス") ; とかやって使う。(もしくは IME_GetConverting()の中に直接追加する) ; ; あああ ← 入力窓の上にマウスカーソル持ってって [Win]+[3]押す ; ￣￣￣ Clipboardに Class名がコピーされる。 ; ※ MS Office系のシームレス入力状態では取れないっぽい ; DetectHiddenWindows,ONでもダメ。シームレスOFFにしないと無理 ; ; 愛 ; |愛　　　| ← 候補窓の上にマウスカーソル持ってって [Win]+[3]押す ; |亜依　　| Clipboardに Class名がコピーされる。 ; |あい　　| ; |藍　　　| ; |　：　　| ; ￣￣￣￣ ;------------------------------------------------------------------ <div style="color:#000080;background-color:#EEEEEE;"> _ImeIsConvertingTest:</div> _ImeTestClassCheck() return <div style="color:#FF0000;background-color:#FFE6EE;">_ImeTestClassCheck() {</div> MouseGetPos,,,hwnd WinGetClass,Imeclass,ahk_id%hwnd% Clipboard:= Imeclass ;IME_GetConverting() 動作チェック & IME 入力窓/候補窓 Class名確認 MsgBox,%Imeclass "`n" IME_GetConverting() } ;--- 常駐テスト終了 [Shift]+[ESC] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeTestExt:</div> ExitApp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;--------------------------------------------------------------------------- ; 汎用関数 (多分どのIMEでもいけるはず) ;----------------------------------------------------------- ; IMEの状態の取得 ; WinTitle="A" 対象Window ; 戻り値 1:ON / 0:OFF ;----------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;">IME_GET(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283;Message : WM_IME_CONTROL , Int,0x0005;wParam : IMC_GETOPENSTATUS , Int,0) ;lParam : 0 } ;----------------------------------------------------------- ; IMEの状態をセット ; SetSts 1:ON / 0:OFF ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;----------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;">IME_SET(SetSts, WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283;Message : WM_IME_CONTROL , Int,0x006 ;wParam : IMC_SETOPENSTATUS , Int, SetSts);lParam : 0 or 1 } ;=========================================================================== ; IME 入力モード (どの IMEでも共通っぽい) ; DEC HEX BIN ; 0 (0x00 0000 0000) かな半英数 ; 3 (0x03 0000 0011) 半ｶﾅ ; 8 (0x08 0000 1000) 全英数 ; 9 (0x09 0000 1001) ひらがな ; 11 (0x0B 0000 1011) 全カタカナ ; 16 (0x10 0001 0000) ローマ字半英数 ; 19 (0x13 0001 0011) 半ｶﾅ ; 24 (0x18 0001 1000) 全英数 ; 25 (0x19 0001 1001) ひらがな ; 27 (0x1B 0001 1011) 全カタカナ ; ※ 地域と言語のオプション - [詳細] - 詳細設定 ; - 詳細なテキストサービスのサポートをプログラムのすべてに拡張する ; が ONになってると値が取れない模様 ; (Google日本語入力βはここをONにしないと駄目なので値が取れないっぽい) ;------------------------------------------------------- ; IME 入力モード取得 ; WinTitle="A" 対象Window ; 戻り値入力モード ;-------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetConvMode(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283;Message : WM_IME_CONTROL , Int,0x001 ;wParam : IMC_GETCONVERSIONMODE , Int,0) ;lParam : 0 } ;------------------------------------------------------- ; IME 入力モードセット ; ConvMode 入力モード ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;-------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_SetConvMode(ConvMode,WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283 ;Message : WM_IME_CONTROL , Int,0x002 ;wParam : IMC_SETCONVERSIONMODE , Int, ConvMode) ;lParam : CONVERSIONMODE } ;=========================================================================== ; IME 変換モード (ATOKはver.16で調査、バージョンで多少違うかも) ; MS-IME 0:無変換 / 1:人名/地名 / 8:一般 /16:話し言葉 ; ATOK系 0:固定 / 1:複合語 / 4:自動 / 8:連文節 ; WXG / 1:複合語 / 2:無変換 / 4:自動 / 8:連文節 ; SKK系 / 1:ノーマル (他のモードは存在しない？) ; Googleβ / 8:ノーマル ;------------------------------------------------------------------ ; IME 変換モード取得 ; WinTitle="A" 対象Window ; 戻り値 MS-IME 0:無変換 1:人名/地名 8:一般 16:話し言葉 ; ATOK系 0:固定 1:複合語 4:自動 8:連文節 ; WXG4 1:複合語 2:無変換 4:自動 8:連文節 ;------------------------------------------------------------------ <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetSentenceMode(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283;Message : WM_IME_CONTROL , Int,0x003 ;wParam : IMC_GETSENTENCEMODE , Int,0) ;lParam : 0 } ;---------------------------------------------------------------- ; IME 変換モードセット ; SentenceMode ; MS-IME 0:無変換 1:人名/地名 8:一般 16:話し言葉 ; ATOK系 0:固定 1:複合語 4:自動 8:連文節 ; WXG 1:複合語 2:無変換 4:自動 8:連文節 ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;----------------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_SetSentenceMode(SentenceMode,WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } returnDllCall("SendMessage" , UInt,DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt,0x0283 ;Message : WM_IME_CONTROL , Int,0x004 ;wParam : IMC_SETSENTENCEMODE , Int, SentenceMode) ;lParam : SentenceMode } ;--------------------------------------------------------------------------- ; IMEの種類を選ぶかもしれない関数 ;========================================================================== ; IME 文字入力の状態を返す ; (パクリ元 : http://sites.google.com/site/agkh6mze/scripts#TOC-IME- ) ; 標準対応IME : ATOK系 / MS-IME2002 2007 / WXG / SKKIME ; その他のIMEは入力窓/変換窓を追加指定することで対応可能 ; ; WinTitle="A" 対象Window ; ConvCls="" 入力窓のクラス名 (正規表現表記) ; CandCls="" 候補窓のクラス名 (正規表現表記) ; 戻り値 1 : 文字入力中 or 変換中 ; 2 : 変換候補窓が出ている ; 0 : その他の状態 ; ; ※ MS-Office系で入力窓のクラス名を正しく取得するにはIMEのシームレス表示を ; OFFにする必要がある ; オプション-編集と日本語入力-編集中の文字列を文書に挿入モードで入力する ; のチェックを外す ;========================================================================== <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetConverting(WinTitle="A",ConvCls="",CandCls="") {</div> ;IME毎の入力窓/候補窓Class一覧 ("|" 区切りで適当に足してけばOK) ConvCls .= (ConvCls ? "|" :"") ;--- 入力窓 --- . "ATOK\d+CompStr" ; ATOK系 . "|imejpstcnv\d+" ; MS-IME系 . "|WXGIMEConv" ; WXG . "|SKKIME\d+\.*\d+UCompStr" ; SKKIME Unicode . "|MSCTFIME Composition" ; Google日本語入力 CandCls .= (CandCls ? "|" :"") ;--- 候補窓 --- . "ATOK\d+Cand" ; ATOK系 . "|imejpstCandList\d+|imejpstcand\d+"; MS-IME 2002(8.1)XP付属 . "|mscandui\d+\.candidate" ; MS Office IME-2007 . "|WXGIMECand" ; WXG . "|SKKIME\d+\.*\d+UCand" ; SKKIME Unicode CandGCls := "GoogleJapaneseInputCandidateWindow";Google日本語入力 ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ?4: A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16,0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd :=DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ?NumGet(stGTI,8+PtrSize,"UInt") : hwnd } WinGet, pid, PID,%"ahk_id" hwnd tmm:=A_TitleMatchMode SetTitleMatchMode, RegEx ret :=WinExist("ahk_class" . CandCls . "ahk_pid" pid) ?2 : WinExist("ahk_class" . CandGCls ) ?2 : WinExist("ahk_class" . ConvCls . "ahk_pid" pid) ?1 : 0 SetTitleMatchMode,%tmm% returnret } </div> </td> </tr></tbody></table></div>

<div style="font-family:'MS Gothic', monospace;margin-left:1em;line-height:130%;"> <table style="border-collapse:collapse;border-width:0;"><tr><td style="border-style:solid;border-width:0px 1px 0px 0px;padding:3pt;text-align:right;color:#5A4F25;background-color:#FFFCF2;"> 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 </td> <td style="white-space:nowrap;padding:5pt;color:#373737;background-color:#FFFCF2;"> <div style="color:#373737;background-color:#FFFCF2;">/***************************************************************************** IME制御用関数群 (IME.ahk) グローバル変数 : なし 各関数の依存性 : なし(必要関数だけ切出してコピペでも使えます) AutoHotkey: L 1.1.08.01 Language: Japanease Platform: NT系 Author: eamat. http://www6.atwiki.jp/eamat/ ***************************************************************************** 履歴 2008.07.11 v1.0.47以降の関数ライブラリスクリプト対応用にファイル名を変更 2008.12.10 コメント修正 2009.07.03 IME_GetConverting() 追加 Last Found Windowが有効にならない問題修正、他。 2009.12.03 ・IME 状態チェック GUIThreadInfo 利用版入れ込み （IEや秀丸8βでもIME状態が取れるように） http://blechmusik.xrea.jp/resources/keyboard_layout/DvorakJ/inc/IME.ahk ・Google日本語入力β 向け調整 入力モード及び変換モードは取れないっぽい IME_GET/SET() と IME_GetConverting()は有効 2012.11.10 x64 & Unicode対応 実行環境を AHK_L U64に (本家およびA32,U32版との互換性は維持したつもり) ・LongPtr対策：ポインタサイズをA_PtrSizeで見るようにした ;================================== ; GUIThreadInfo ;================================= ; 構造体 GUITreadInfo ;typedef struct tagGUITHREADINFO {(x86) (x64) ; DWORD cbSize; 0 0 ; DWORD flags; 4 4 ※ ; HWND hwndActive; 8 8 ; HWND hwndFocus; 12 16 ※ ; HWND hwndCapture; 16 24 ; HWND hwndMenuOwner; 20 32 ; HWND hwndMoveSize; 24 40 ; HWND hwndCaret; 28 48 ; RECT rcCaret; 32 56 ;} GUITHREADINFO, *PGUITHREADINFO; ・WinTitleパラメータが実質無意味化していたのを修正 対象がアクティブウィンドウの時のみ GetGUIThreadInfoを使い そうでないときはControlハンドルを使用 一応バックグラウンドのIME情報も取れるように戻した (取得ハンドルをWindowからControlに変えたことでブラウザ以外の大半の アプリではバックグラウンドでも正しく値が取れるようになった。 ※ブラウザ系でもアクティブ窓のみでの使用なら問題ないと思う、たぶん) */ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; 動作確認用内部ルーチン (マウスカーソル位置のウィンドウのIME状態を見る) ; 単体起動時のテスト用なので削除しても問題なし <div style="color:#000080;background-color:#EEEEEE;"> _ImeAutoExecuteSample:</div> Hotkey,#1,_ImeGetTest Hotkey,#2,_ImeSetTest Hotkey,#3,_ImeIsConvertingTest Hotkey,+ESC,_ImeTestExt SetTimer,_ImeInfoTimer,ON return ;--- IME状態表示タイマ --- <div style="color:#000080;background-color:#EEEEEE;">_ImeInfoTimer:</div> Tooltip,% "IME_GET : " . IME_GET(_mhwnd()) . "`n" . "IME_GetConvMode : " . IME_GetConvMode(_mhwnd()) . "`n" . "IME_GetSentenceMode : " . IME_GetSentenceMode(_mhwnd()) . "`n" . "IME_GetConverting : " . IME_GetConverting(_mhwnd()) return ;--- IME Get Test [Win]+[1] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeGetTest:</div> MsgBox,% "IME_GET : " . IME_GET(_mhwnd()) . "`n" . "IME_GetConvMode : " . IME_GetConvMode(_mhwnd()) . "`n" . "IME_GetSentenceMode : " . IME_GetSentenceMode(_mhwnd()) . "`n" return ;--- IME Get Test [Win]+[2] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeSetTest:</div> MsgBox,% "IME_SET : " . IME_SET(1,_mhwnd()) . "`n" . "IME_SetConvMode : " . IME_SetConvMode(0x08,_mhwnd()) . "`n" . "IME_SetSentenceMode : " . IME_SetSentenceMode(1,_mhwnd()) . "`n" return <div style="color:#FF0000;background-color:#FFE6EE;">_mhwnd(){ ;background test</div> MouseGetPos,x,,hwnd return "ahk_id " . hwnd } ;------------------------------------------------------------------ ; IME窓のクラス名を調べるテストルーチン ; 入力or変換状態でIme窓にマウスカーソル持ってって [Win]+[3]押す ; Clipboardに Class名がコピーされる。入力窓/候補窓それぞれ調べる。 ; 調べたクラス名は正規表現になおして ; IME_GetConverting("A","入力窓クラス","候補窓クラス") ; とかやって使う。(もしくは IME_GetConverting()の中に直接追加する) ; ; あああ ← 入力窓の上にマウスカーソル持ってって [Win]+[3]押す ; ￣￣￣ Clipboardに Class名がコピーされる。 ; ※ MS Office系のシームレス入力状態では取れないっぽい ; DetectHiddenWindows,ONでもダメ。シームレスOFFにしないと無理 ; ; 愛 ; |愛　　　| ← 候補窓の上にマウスカーソル持ってって [Win]+[3]押す ; |亜依　　| Clipboardに Class名がコピーされる。 ; |あい　　| ; |藍　　　| ; |　：　　| ; ￣￣￣￣ ;------------------------------------------------------------------ <div style="color:#000080;background-color:#EEEEEE;"> _ImeIsConvertingTest:</div> _ImeTestClassCheck() return <div style="color:#FF0000;background-color:#FFE6EE;">_ImeTestClassCheck() {</div> MouseGetPos,,,hwnd WinGetClass,Imeclass,ahk_id %hwnd% Clipboard := Imeclass ;IME_GetConverting() 動作チェック & IME 入力窓/候補窓 Class名確認 MsgBox,% Imeclass "`n" IME_GetConverting() } ;--- 常駐テスト終了 [Shift]+[ESC] --- <div style="color:#000080;background-color:#EEEEEE;">_ImeTestExt:</div> ExitApp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;--------------------------------------------------------------------------- ; 汎用関数 (多分どのIMEでもいけるはず) ;----------------------------------------------------------- ; IMEの状態の取得 ; WinTitle="A" 対象Window ; 戻り値 1:ON / 0:OFF ;----------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;">IME_GET(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x0005 ;wParam : IMC_GETOPENSTATUS , Int, 0) ;lParam : 0 } ;----------------------------------------------------------- ; IMEの状態をセット ; SetSts 1:ON / 0:OFF ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;----------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;">IME_SET(SetSts, WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x006 ;wParam : IMC_SETOPENSTATUS , Int, SetSts) ;lParam : 0 or 1 } ;=========================================================================== ; IME 入力モード (どの IMEでも共通っぽい) ; DEC HEX BIN ; 0 (0x00 0000 0000) かな半英数 ; 3 (0x03 0000 0011) 半ｶﾅ ; 8 (0x08 0000 1000) 全英数 ; 9 (0x09 0000 1001) ひらがな ; 11 (0x0B 0000 1011) 全カタカナ ; 16 (0x10 0001 0000) ローマ字半英数 ; 19 (0x13 0001 0011) 半ｶﾅ ; 24 (0x18 0001 1000) 全英数 ; 25 (0x19 0001 1001) ひらがな ; 27 (0x1B 0001 1011) 全カタカナ ; ※ 地域と言語のオプション - [詳細] - 詳細設定 ; - 詳細なテキストサービスのサポートをプログラムのすべてに拡張する ; が ONになってると値が取れない模様 ; (Google日本語入力βはここをONにしないと駄目なので値が取れないっぽい) ;------------------------------------------------------- ; IME 入力モード取得 ; WinTitle="A" 対象Window ; 戻り値入力モード ;-------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetConvMode(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x001 ;wParam : IMC_GETCONVERSIONMODE , Int, 0) ;lParam : 0 } ;------------------------------------------------------- ; IME 入力モードセット ; ConvMode 入力モード ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;-------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_SetConvMode(ConvMode,WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x002 ;wParam : IMC_SETCONVERSIONMODE , Int, ConvMode) ;lParam : CONVERSIONMODE } ;=========================================================================== ; IME 変換モード (ATOKはver.16で調査、バージョンで多少違うかも) ; MS-IME 0:無変換 / 1:人名/地名 / 8:一般 /16:話し言葉 ; ATOK系 0:固定 / 1:複合語 / 4:自動 / 8:連文節 ; WXG / 1:複合語 / 2:無変換 / 4:自動 / 8:連文節 ; SKK系 / 1:ノーマル (他のモードは存在しない？) ; Googleβ / 8:ノーマル ;------------------------------------------------------------------ ; IME 変換モード取得 ; WinTitle="A" 対象Window ; 戻り値 MS-IME 0:無変換 1:人名/地名 8:一般 16:話し言葉 ; ATOK系 0:固定 1:複合語 4:自動 8:連文節 ; WXG4 1:複合語 2:無変換 4:自動 8:連文節 ;------------------------------------------------------------------ <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetSentenceMode(WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x003 ;wParam : IMC_GETSENTENCEMODE , Int, 0) ;lParam : 0 } ;---------------------------------------------------------------- ; IME 変換モードセット ; SentenceMode ; MS-IME 0:無変換 1:人名/地名 8:一般 16:話し言葉 ; ATOK系 0:固定 1:複合語 4:自動 8:連文節 ; WXG 1:複合語 2:無変換 4:自動 8:連文節 ; WinTitle="A" 対象Window ; 戻り値 0:成功 / 0以外:失敗 ;----------------------------------------------------------------- <div style="color:#FF0000;background-color:#FFE6EE;"> IME_SetSentenceMode(SentenceMode,WinTitle="A") {</div> ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } return DllCall("SendMessage" , UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd) , UInt, 0x0283 ;Message : WM_IME_CONTROL , Int, 0x004 ;wParam : IMC_SETSENTENCEMODE , Int, SentenceMode) ;lParam : SentenceMode } ;--------------------------------------------------------------------------- ; IMEの種類を選ぶかもしれない関数 ;========================================================================== ; IME 文字入力の状態を返す ; (パクリ元 : http://sites.google.com/site/agkh6mze/scripts#TOC-IME- ) ; 標準対応IME : ATOK系 / MS-IME2002 2007 / WXG / SKKIME ; その他のIMEは入力窓/変換窓を追加指定することで対応可能 ; ; WinTitle="A" 対象Window ; ConvCls="" 入力窓のクラス名 (正規表現表記) ; CandCls="" 候補窓のクラス名 (正規表現表記) ; 戻り値 1 : 文字入力中 or 変換中 ; 2 : 変換候補窓が出ている ; 0 : その他の状態 ; ; ※ MS-Office系で入力窓のクラス名を正しく取得するにはIMEのシームレス表示を ; OFFにする必要がある ; オプション-編集と日本語入力-編集中の文字列を文書に挿入モードで入力する ; のチェックを外す ;========================================================================== <div style="color:#FF0000;background-color:#FFE6EE;"> IME_GetConverting(WinTitle="A",ConvCls="",CandCls="") {</div> ;IME毎の入力窓/候補窓Class一覧 ("|" 区切りで適当に足してけばOK) ConvCls .= (ConvCls ? "|" : "") ;--- 入力窓 --- . "ATOK\d+CompStr" ; ATOK系 . "|imejpstcnv\d+" ; MS-IME系 . "|WXGIMEConv" ; WXG . "|SKKIME\d+\.*\d+UCompStr" ; SKKIME Unicode . "|MSCTFIME Composition" ; Google日本語入力 CandCls .= (CandCls ? "|" : "") ;--- 候補窓 --- . "ATOK\d+Cand" ; ATOK系 . "|imejpstCandList\d+|imejpstcand\d+" ; MS-IME 2002(8.1)XP付属 . "|mscandui\d+\.candidate" ; MS Office IME-2007 . "|WXGIMECand" ; WXG . "|SKKIME\d+\.*\d+UCand" ; SKKIME Unicode CandGCls := "GoogleJapaneseInputCandidateWindow" ;Google日本語入力 ControlGet,hwnd,HWND,,,%WinTitle% if (WinActive(WinTitle)) { ptrSize := !A_PtrSize ? 4 : A_PtrSize VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0) NumPut(cbSize, stGTI, 0, "UInt") ; DWORD cbSize; hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd } WinGet, pid, PID,% "ahk_id " hwnd tmm:=A_TitleMatchMode SetTitleMatchMode, RegEx ret := WinExist("ahk_class " . CandCls . " ahk_pid " pid) ? 2 : WinExist("ahk_class " . CandGCls ) ? 2 : WinExist("ahk_class " . ConvCls . " ahk_pid " pid) ? 1 : 0 SetTitleMatchMode, %tmm% return ret } </div> </td> </tr></table></div>

表示オプション

横に並べて表示：

変化行の前後のみ表示：