首先是inputRun.ahk的代码:
#persistent
inifilePath=%A_ScriptDir%\myStartFile.ini
filePathArr := [] ;我们的文件名字数组
SectionName=startapp ;我们读取的段名，ini文件的"[]"里面的
keyName=app ;我们的key值首字符串，如"app1"开头是"app"
cnt:=1 ;我们的文件计数
input_text="" ;从输入框中读取的消息
;初始化
readFileArr() ;读取文件到数组
initGui() ;输入窗口初始化
;得到一个输入框然后输入数字，如果数字对就运行，不对就不运行，
;整个程序的热键在这里
#NumPadMult::
getAWord("")
return ;结束热键
;-----------------------下面是上面调用的函数--------------------------------
;函数读取文件
readFileArr(){
global filePathArr
global cnt:=1
global inifilePath
global keyName
loop ;循环
{
keyIndexName=%keyName%%cnt%
IniRead,t_AppContent,%inifilePath%,startapp,%keyIndexName%,"error"
if t_AppContent="error"
{
cnt-=1
return
}
;msgBox,%t_AppContent%
filePathArr[cnt] := t_AppContent
;数组可以把变量直接当下标，而不用引用符号%%
cnt+=1
}
}
;打开对下标的文件
getStart(run_index)
{
global filePathArr
startText:=filePathArr[run_index]
if strLen(startText) = 0
{
text_t="%run_index% is not found"
runWait ,%A_ScriptDir%\showError.exe %text_t%
getAWord("")
}
run,%startText%
}
;得到用户输入的一个字符串
getAWord(hint){
global input_text
GuiControl,,input_text,%hint% ;清空
;本来窗口样式已经定义好,
Gui,show,AutoSize Center ;显示界面
addGuiHotkeys() ;添加gui的热键
}
getInput()
{
global input_text
;键盘点击事件
;input_text里面的值是我们的字符串变量
input_text := Trim( input_text , " " ) ;去掉空格和tab
input_text := Trim( input_text , "*" ) ;去掉*
;msgBox,%input_text%
gui,submit ;gui界面提交隐藏
clearGuiHotKeys()
return ;退出
}
;----------------------------------------gui 窗口的样式---------------------------------------------------
initGui(){
Gui_color1=black
font_color1=Cblack
global input_text
Gui, -SysMenu -Caption +ToolWindow +AlwaysOnTop +E0x20
;先控制属性，下面依据这些属性加窗口
Gui, Color, %Gui_color1%
gui, font,s20 %font_color1%, Arial
;;注意"vMyText" 定义了该控件的变量，该变量"MyText"将是全局变量（或是引用类型变量，或一个静态变量）。
Gui,add,Edit, wrap vinput_text
}
;添加gui的热键
addGuiHotkeys(){
Hotkey,Enter,,On ;回车事件on
Hotkey,LButton,,On ;鼠标左键事件On
OnMessage(0x100, "ON_WM_KEYDOWN1")
}
ON_WM_KEYDOWN1(wParam, lParam){
OnMessage(0x100, "ON_WM_KEYDOWN2") ;调用另一个keydown函数，防止打开就执行
}
ON_WM_KEYDOWN2(wParam, lParam){
;msgBox,%wParam%
Hotkey,LButton,,Off ;鼠标左键事件Off
}
;清空gui的热键
clearGuiHotKeys(){
Hotkey,Enter,,Off ;回车事件off
Hotkey,LButton,,Off ;鼠标左键事件Off
}
;-------------------------------------------------------------------------------------------
F11::
;退出 F11
exitapp
return ;;结束代码段
GuiEscape:
GuiControl,,input_text,%hint% ;清空
Gui ,Minimize
clearGuiHotKeys() ;清空gui的热键
return
;用户按下回车的事件
Enter::
getInput() ;提交
getStart(input_text) ;执行
LButton::
GuiControl,,input_text,%hint% ;清空
Hotkey,LButton,Off ;鼠标左键事件off
然后是showError.ahk:
;显示时间
;显示时间
#SingleInstance Force
showStr = %1%
Gui_color1= black
font_color1=Cred
Gui, -SysMenu -Caption +ToolWindow +AlwaysOnTop +E0x20
;先控制属性，下面依据这些属性加窗口
Gui, Color, %Gui_color1%
gui, font,s20 %font_color1%, Arial
;;注意"vMyText" 定义了该控件的变量，该变量"MyText"将是全局变量（或是引用类型变量，或一个静态变量）。
Gui,add,Text,vMyText, %showStr%
Gui,show,AutoSize Center
;键盘点击事件
OnMessage(0x100, "ON_WM_KEYDOWN1")
OnMessage(0x202, "ON_WM_LBUTTONUP")
return
ON_WM_KEYDOWN1()
{
;keydown 再keyup防止开始就有keyup事件响应
OnMessage(0x101, "ON_WM_KEYUP2")
return ;退出
}
ON_WM_KEYUP2()
{
exitapp
return ;退出
}
ON_WM_LBUTTONUP()
{
exitapp
return ;退出
}
;一些消息映射:
;WM_KEYDOWN = 0x100
;WM_KEYUP = 0x101
;WM_MOUSEMOVE = 0x200
;WM_LBUTTONDOWN = 0x201
;WM_LBUTTONUP = 0x202
;WM_LBUTTONDBLCLK = 0x203
;WM_RBUTTONDOWN = 0x204
;WM_RBUTTONUP = 0x205
;WM_RBUTTONDBLCLK = 0x206
;WM_MBUTTONDOWN = 0x207
;WM_MBUTTONUP = 0x208
;WM_MBUTTONDBLCLK = 0x209
最后是ini文件的配置：
;数字必须按照顺序不能跳跃，可以后面等于空，不能不出现1就出现2。然后你就可以手动一直添加app+数字等于...，添加后重启inputRUn文件
;你的文档最好都是ANSI编码，要不可能乱码不认
[startapp]
app1="你的目录\excel文档.xlsx"
app2=explorer D:\
app3=chrome www.bai.com
app4="你的目录\任何文档.后缀"
app5="ahk目录\myTime.ahk"
三个文件都写完，然后把所有的文件都放到一个文件夹下，最好不要是中文字符路径。
然后，“#NumPadMult::你的操作”，就是快捷键win+小键盘乘号绑定你的操作，你可以修改文件换成自己喜欢的。按下快捷键，我们就有了一个输入框：
我们输入数字:
就打开了d盘:
“app+NUm=你的路径或程序加参数”，这样的格式你可以继续添加很多，我们的程序启动时按照顺序把它读取到一个数组里，我们直接就输入num就能打开我们需要的东西了。注意，不要跳跃序号。然后，简易自定义启动器就做好了。
