AutoHotkey Thread 2 - 暇つぶし2ch

AutoHotkey Thread 2 ..

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

126:名無しさん＠お腹いっぱい。
 05/11/08 01:56:56 BqfIoljv0
どのへんを関数化したいのかわからんのだが 
取り零しとかあるしトリガは素直にホットキー使ったほうがよい 
モデファイヤキーの押下状態で内部分岐もできるが 
これだとhが入力できなくなるので ~ つけるか中でSendするとかの処理が必要 
 
*h:: 
    dsp= 
if (GetKeyState("CTRL")) 
dsp = ctrl 
if (GetKeyState("SHIFT")) 
dsp = %dsp% sift 
if (GetKeyState("ALT")) 
dsp = %dsp% alt 
if (GetKeyState("LWIN") || GetKeyState("RWIN")) 
dsp = %dsp% win 
 
ToolTip,%dsp% 
return

127:名無しさん＠お腹いっぱい。
 05/11/08 07:16:19 OmlMtwX30
SetHotkey("n" , "notepad.exe", "C:\WINNT\System32", "max") 
SetHotkey("c", "calc.exe", "C:\WINNT\System32", "") 
return 
 
SetHotkey(key, appPath, appWorkDir, appWinState) 
{ 
global 
appPath%key%:=appPath 
appWorkDir%key%:=appWorkDir 
appWinState%key%:=appWinState 
Hotkey, #%key%, launchApp 
;Hotkey, ^#%key%, quitApp 
;Hotkey, !#%key%, toggleWindow 
Return 
} 
 
launchApp: 
StringRight, key, A_ThisHotkey, 1 
appPath:=appPath%key% 
appWorkDir:=appWorkDir%key% 
appWinState:=appWinState%key% 
Run, %appPath%, %appWorkDir%, %appWinState% 
Return 
 
hotkeyが関数に対応してないからめんどくさかった・・ 
とりあえずこれで動的に割り当てられるはず。 
 
ﾔﾚﾔﾚﾀﾞｾﾞ( ﾟдﾟ)y─┛~~

次ページ