ATOK手書き入力をESCキーで閉じる

閉じるボタンをマウスクリックするしか閉じる方法がないものですが、以下の様なスクリプトで閉じることができます。

$ESC:: ; 頭に$が必要です。（無限ループ防止のため）
ifWinExist, ahk_class ATOK30TegakiPalette ; 「手書き入力」が起動していたケース
{
Close_ATOK_TEGAKI()
return
}
Send, {ESC}
return


Close_ATOK_TEGAKI() {
ifWinExist, ahk_class ATOK30TegakiPalette ; 「手書き入力」が起動していたケース
{
;ATOK手書き入力が起動しているときは、必ず（隠された）アクティブなウィンドウでもあります。

;WinClose, ahk_class ATOK30TegakiPalette
;これだと、ATOK内部での「手書き入力」『起動すべきフラグ』が立ったままとなり、また出てくる・・・

CoordMode, Mouse, Screen
MouseGetPos, xpos, ypos
WinGetPos, X, Y, Width, Height, ahk_class ATOK30TegakiPalette
tar_X := X+Width-5
tar_Y := Y+5
MouseClick, Left, %tar_X%, %tar_Y%, 1, 0
MouseMove, %xpos%, %ypos%, 0
return
}

return
}