AutoHotkey Thread 2at SOFTWAREAutoHotkey Thread 2 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト138:128 05/11/08 19:32:07 AQU/ZuaD0 >>137 なるほど。 ありがとうございました。 139:名無しさん@お腹いっぱい。 05/11/08 22:48:46 x8v+5Rvv0 >>134 続きを改良しつつ、作ってみました。 SetHotkey(key, appPath, appTitle, appWorkDir="", appOpt="") { global appPath%key%:=appPath appTitle%key%:=appTitle appWorkDir%key%:=appWorkDir appOpt%key%:=appOpt Hotkey, #%key%, launchApp Hotkey, ^#%key%, quitApp Hotkey, !#%key%, toggleWindow Return } launchApp: StringRight, key, A_ThisHotkey, 1 appPath:=appPath%key% appTitle:=appTitle%key% appWorkDir:=appWorkDir%key% appOpt:=appOpt%key% ifWinNotExist, %appTitle% Run, %appPath%, %appWorkDir%, %appOpt% else WinActivate, %appTitle% return Return 140:名無しさん@お腹いっぱい。 05/11/08 22:50:31 x8v+5Rvv0 quitApp: StringRight, key, A_ThisHotkey, 1 appTitle:=appTitle%key% ifWinNotExist, %appTitle% Exit else WinClose, %appTitle% return Return toggleWindow: StringRight, key, A_ThisHotkey, 1 appPath:=appPath%key% appTitle:=appTitle%key% appWorkDir:=appWorkDir%key% appOpt:=appOpt%key% ifWinNotExist, %appTitle% Exit else WinSet, Topmost, TOGGLE, %appTitle% return Return んー >>126さんの言うとおり、取りこぼしがあるし、 Topmostのトグルが出来てないような。 折角作ってもらったのに、ホットキーの方が確かってことなんですかねぇ。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch