文章
文章用户店铺百科资讯论坛导航

一个网友仿照我的承影做的AHK源码管理器

;源码


;by Sixtyone At 2016.4.10

;更新说明

/*

2016.4.24:

1.运行#脚本后，gui自动隐藏；

2.启动脚本目录后，gui自动隐藏。

2016.4.17:

1. 增加过滤中使用%A_ScriptDir%变量。

2016.4.14:

1.修复2016.4.13版本中的1个bug;

2.添加文件(夹)过滤功能：添加到过滤中的文件(夹),将不会被读取到AHK管理器中；

3.修复之前版本某些脚本不能关闭问题；

4.修复脚本不能正确读取ini配置问题。

2016.4.13:

1.更新添加“Scripts文件夹内的第一层子文件夹脚本”，但所有脚本不能同名。

2016.4.11:

1.脚本库中启动条目后,焦点自带设置为上一条,正在运行库同;

2.更新脚本库双击运行脚本,正在运行库双击关闭脚本;

3.脚本库增加右键菜单:"编辑","运行"--正在运行库增加右键菜单:"编辑","重载","关闭"。

*/

#SingleInstance Force

#NoEnv

;#Warn

SetWorkingDir %A_ScriptDir%

Process, Priority,, High

DetectHiddenWindows,On

Menu, Tray, NoStandard                  ;删除自带托盘菜单

Menu, tray, add, 管理,ShowGui  ;  显示gui

Menu, tray, add  ; 创建分隔线.

Menu, tray, add ,过滤,Menu_Tray_过滤        ;  过滤

Menu, tray, add ,脚本目录,Menu_Tray_OpenDir          ;  脚本目录

Menu, tray, add ,重启管理器,Menu_Tray_Reload          ; 重启

Menu, tray, Add

Menu, tray, Add,帮助,Help ;Help

Menu, tray, Add,关于,About ;关于

Menu, tray, Add

Menu, tray, Add, 退出, ExitSub                  ; 创建    退出

Menu, Tray, Default, 管理  ;;默认  菜单：配置

Menu, Tray, Icon, Shell32.dll, 258

;IntelligentScript:

Gui,Destroy

Gui Add, ListView, x8 y30 w200 h400 AltSubmit vScriptLibrary g运行 , 脚本名称

Gui Add, Text, x10 y3 w120 h23 +0x200, 脚本库

Gui Add, ListView, x233 y30 w200 h400 AltSubmit vScriptRun g运行2, 脚本名称

Gui Add, Text, x234 y3 w120 h23 +0x200, 已运行脚本

Gui Add, Button, x440 y30 w60 h42 gtsk_open, 启动脚本

Gui Add, Button, x440 y100 w60 h42 gtsk_restart, 重载脚本

Gui Add, Button, x440 y170 w60 h42 gtsk_close, 关闭脚本

Gui Add, Button, x440 y240 w60 h42 gMenu_Tray_OpenDir, 脚本目录

Gui Add, Button, x440 y310 w60 h42 gMenu_Tray_Reload, 重启管理器

Gui Add, Button, x440 y380 w60 h42 gExitSub, 退出

;Gui Show,, AHK管理器

Gui Default

Gui,ListView,ScriptLibrary

scriptCount = 0

IniRead,Golv,过滤.ini,过滤

OpenList := Array()

UnOpenList := Array()

Loop, %A_ScriptDir%\scripts\*.ahk,,1

{

_Golv=0

loop,Parse,Golv,`n,`r                  ;增加过滤判断

{

StringReplace,_GolvPath,A_LoopField,`%A_ScriptDir`%,%A_ScriptDir%

ifInString,A_LoopFileLongPath ,%_GolvPath%

{

_Golv=1

break

}

}

if  _Golv=1

continue

if !(A_LoopFileLongPath~="i).+?\\scripts\\[^\\]*\\?[^\\]+\.ahk")                          ;增加一层子文件读取

continue

StringReplace, MenuName, A_LoopFileName, .ahk

scriptCount += 1

%MenuName%_Path :=A_LoopFileLongPath

%MenuName%_Dir :=A_LoopFileDir

scriptsName%scriptCount% := A_LoopFileName

;scriptsOpened%scriptCount% = 0

UnOpenList.Insert(MenuName)

}

InsertionSort(UnOpenList)

for Index, MenuName in UnOpenList

{

LV_Add("",MenuName)

}

LV_ModifyCol()

gosub tsk_openAll

;Gui,Show

return

运行:

if A_GuiEvent = DoubleClick

{

goto,tsk_open

}

return

运行2:

if A_GuiEvent = DoubleClick

goto,tsk_close

return

GuiContextMenu:  ; 运行此标签来响应右键点击或按下 Appskey.

if A_GuiControl = ScriptLibrary  ; 这个检查是可选的. 让它只为 ListView 中的点击显示菜单.

{

Gui,Default

Gui,ListView,ScriptLibrary

RowNumber = 0

Loop,%scriptCount%

{

RowNumber := LV_GetNext(RowNumber)

if not RowNumber

Return

break

}

Menu,PopC,Add,编辑,P_edit

Menu,PopC,Add,运行,tsk_open

menu,PopC,Show

return

}

if  A_GuiControl = ScriptRun

{

Gui,Default

Gui,ListView,ScriptRun

RowNumber = 0

Loop,%scriptCount%

{

RowNumber := LV_GetNext(RowNumber)

if not RowNumber

Return

break

}

Menu,PopC2,Add,编辑,P_edit

Menu,PopC2,Add,重载,tsk_restart

Menu,PopC2,Add,关闭,tsk_close

menu,PopC2,Show

return

}

return

P_edit:

LV_GetText(thisScript, RowNumber)

P_editpath :=%thisScript%_path

Run, F:\Program Files\AutoHotkey\SciTE\SciTE.exe  "%P_editpath%"

return

tsk_open:

Gui,Default

Gui,ListView,ScriptLibrary

RowNumber = 0

Loop,%scriptCount%

{

RowNumber := LV_GetNext(RowNumber)

if not RowNumber

Return

LV_GetText(thisScript, RowNumber)

Run,% %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

IfInString, thisScript, #

{

Gui, Hide

Return

}

;scriptsOpened%A_Index% := 1

break

}

Gui,ListView,ScriptRun

LV_Add("",ThisScript)

LV_ModifyCol()

Gui,ListView,ScriptLibrary

Loop, %scriptCount%

{

LV_GetText(outputname,A_Index,1)

if (outputname=ThisScript)

{

LV_Delete(A_Index)

if A_Index<>1

{

LV_Modify(A_Index-1, "Select")

}

else

{

LV_Modify(1, "Select")

}

break

}

}

LV_ModifyCol()

return

tsk_close:

Gui,Default

Gui,ListView,ScriptRun

RowNumber = 0

Loop,%scriptCount%

{

RowNumber := LV_GetNext(RowNumber)

if not RowNumber

Return

LV_GetText(thisScript, RowNumber)

ID:=%thisScript%

WinClose, ahk_pid %ID%

IfWinExist,ahk_pid %ID%

Process,Close,%ID%

;scriptsOpened%A_Index% := 0

break

}

Gui,ListView,ScriptLibrary

LV_Add("",ThisScript)

LV_ModifyCol()

Gui,ListView,ScriptRun

Loop, %scriptCount%

{

LV_GetText(outputname,A_Index,1)

if (outputname=thisScript)

{

LV_Delete(A_Index)

if A_Index<>1

{

LV_Modify(A_Index-1, "Select")

}

else

{

LV_Modify(1, "Select")

}

break

}

}

LV_ModifyCol()

return

tsk_restart:

Gui,Default

Gui,ListView,ScriptRun

RowNumber = 0

Loop,%scriptCount%

{

RowNumber := LV_GetNext(RowNumber)

if not RowNumber

Return

LV_GetText(thisScript, RowNumber)

ID:=%thisScript%

WinClose, ahk_pid %ID%

IfWinExist,ahk_pid %ID%

Process,Close,%ID%

Run,% %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

break

}

return

tsk_openAll:

Loop, %scriptCount%

{

thisScript := scriptsName%A_Index%

StringReplace, thisScript, thisScript, .ahk

;if scriptsOpened%A_Index% = 0

;{

IfInString, thisScript, _          ;IfInString,%thisScript%_Path,%A_ScriptDir%\Scripts\_    不自动启动_文件夹内的脚本

{

continue

}

IfInString, thisScript, #

{

continue

}

Run, % %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

;scriptsOpened%A_Index% = 1

Gui,Default

Gui,ListView,ScriptRun

LV_Add("",thisScript)

LV_ModifyCol()

Gui,ListView,ScriptLibrary

Loop, %scriptCount%

{

LV_GetText(outputname,A_Index,1)

if (outputname=thisScript)

{

LV_Delete(A_Index)

break

}

}

LV_ModifyCol()

;}

}

;Gui,Show

return

Menu_Tray_过滤:

Run, Notepad.exe  过滤.ini

return

Menu_Tray_OpenDir:

Run, %A_ScriptDir%\scripts

gui,Hide

return

Menu_Tray_Reload:

gui,Hide

Gui,Default

Gui,ListView,ScriptRun

Loop % LV_GetCount()

{

LV_GetText(thisScript, A_Index)

ID:=%thisScript%

WinClose, ahk_pid %ID%

IfWinExist,ahk_pid %ID%

Process,Close,%ID%

}

Reload

return

GuiEscape:

GuiClose:

Gui, Hide

return

ExitSub:

msgbox,260,是否退出？,退出脚本,将退出所有经过AHK管理器启动的脚本，你是否确认退出？

IfMsgBox No

return

gui,Hide

Gui,Default

Gui,ListView,ScriptRun

Loop % LV_GetCount()

{

LV_GetText(thisScript, A_Index)

ID:=%thisScript%

WinClose, ahk_pid %ID%

IfWinExist,ahk_pid %ID%

Process,Close,%ID%

}

Gui,Destroy

ExitApp

return

InsertionSort(ByRef array)

{

target := Array()

count := 0

for Index, Files in array

{

files%Index% := Files

count += 1

}

j := 2

while (j <= count)

{

key := files%j%

i := j-1

while (i >= 0 && key < files%i%)

{

k := i+1

files%k% := files%i%

i -= 1

}

k := i+1

files%k% := key

j += 1

}

Loop, %count%

{

target.Insert(files%A_Index%)

}

array := target

}

About:

msgbox,AHK管理器`n版本号：2016.4.24`nCopyright©2016 Sixtyone.  All Rights Reserved.`n`n关于作者:`n`tName:Sixtyone`n`tQQ:576642385

return

Help:

msgbox,将AHK脚本放在脚本目录下进行管理:`n1.以_开头的脚本不会自动加载`n2.以#开头的脚本为临时脚本即运行完就退出`n3.脚本名字不能有空格及除_、#以为的符号`n4.脚本不能为快捷方式

return

F18::

ShowGui:

gui,Show,,AHK管理器

return

作者：sixtyone
链接：https://www.jianshu.com/p/d88f47fa431d
來源：简书
简书著作权归作者所有，任何形式的转载都请联系作者获得授权并注明出处。

 

给TA捐赠
共{{data.count}}人
人已捐赠
源码管理
其他应用

阴阳师刷玉魂脚本

2018-9-4 11:25:45

其他应用

生死狙击动态键盘按键映射

2018-9-4 13:47:21

4 条回复 A文章作者 M管理员
  1. user14819

    路过…点赞…

  2. aahk

    这个管理器我比较喜欢，我现在已设置为跟随系统自动启动的脚本

    根据具体情况我做了如下修改

    修改1：
    F1::
    isShow:=!isShow
    if(isShow)
    {
    ShowGui:

    Gui,Show,,AHK管理器
    }
    else
    Gui,Hide
    return

    ;~ 作者：sixtyone

    修改2：
    UnOpenList := Array()
    FileCreateDir,%A_ScriptDir%\scripts
    loop, %A_ScriptDir%\scripts\*.ahk,,1

    修改3：
    Menu_Tray_OpenDir:
    FileCreateDir,%A_ScriptDir%\scripts
    Run, %A_ScriptDir%\scripts

    修改4：
    脚本名字不能有空格及除_、#以外的符号

    • aahk

      ;~ AHK源码管理器
      ;~ isShow:=true
      ;源码

      ;by Sixtyone At 2016.4.10

      ;更新说明

      /*

      2016.4.24:

      1.运行#脚本后，gui自动隐藏；

      2.启动脚本目录后，gui自动隐藏。

      2016.4.17:

      1. 增加过滤中使用%A_ScriptDir%变量。

      2016.4.14:

      1.修复2016.4.13版本中的1个bug;

      2.添加文件(夹)过滤功能：添加到过滤中的文件(夹),将不会被读取到AHK管理器中；

      3.修复之前版本某些脚本不能关闭问题；

      4.修复脚本不能正确读取ini配置问题。

      2016.4.13:

      1.更新添加“Scripts文件夹内的第一层子文件夹脚本”，但所有脚本不能同名。

      2016.4.11:

      1.脚本库中启动条目后,焦点自带设置为上一条,正在运行库同;

      2.更新脚本库双击运行脚本,正在运行库双击关闭脚本;

      3.脚本库增加右键菜单:”编辑”,”运行”–正在运行库增加右键菜单:”编辑”,”重载”,”关闭”。

      */

      #SingleInstance Force

      #NoEnv

      ;#Warn

      SetWorkingDir %A_ScriptDir%

      Process, Priority,, High

      DetectHiddenWindows,On

      Menu, Tray, NoStandard ;删除自带托盘菜单

      Menu, tray, add, 管理,ShowGui ; 显示Gui

      Menu, tray, add ; 创建分隔线.

      Menu, tray, add ,过滤,Menu_Tray_过滤 ; 过滤

      Menu, tray, add ,脚本目录,Menu_Tray_OpenDir ; 脚本目录

      Menu, tray, add ,重启管理器,Menu_Tray_Reload ; 重启

      Menu, tray, Add

      Menu, tray, Add,帮助,Help ;Help

      Menu, tray, Add,关于,About ;关于

      Menu, tray, Add

      Menu, tray, Add, 退出, ExitSub ; 创建 退出

      Menu, Tray, Default, 管理 ;;默认 菜单：配置

      Menu, Tray, Icon, Shell32.dll, 258

      ;IntelligentScript:

      Gui,Destroy

      Gui Add, ListView, x8 y30 w200 h400 AltSubmit vScriptLibrary g运行 , 脚本名称

      Gui Add, Text, x10 y3 w120 h23 +0x200, 脚本库

      Gui Add, ListView, x233 y30 w200 h400 AltSubmit vScriptRun g运行2, 脚本名称

      Gui Add, Text, x234 y3 w120 h23 +0x200, 已运行脚本

      Gui Add, Button, x440 y30 w60 h42 gtsk_open, 启动脚本

      Gui Add, Button, x440 y100 w60 h42 gtsk_restart, 重载脚本

      Gui Add, Button, x440 y170 w60 h42 gtsk_close, 关闭脚本

      Gui Add, Button, x440 y240 w60 h42 gMenu_Tray_OpenDir, 脚本目录

      Gui Add, Button, x440 y310 w60 h42 gMenu_Tray_Reload, 重启管理器

      Gui Add, Button, x440 y380 w60 h42 gExitSub, 退出

      ;Gui Show,, AHK管理器

      Gui Default

      Gui,ListView,ScriptLibrary

      scriptCount = 0

      IniRead,Golv,过滤.ini,过滤

      OpenList := Array()

      UnOpenList := Array()
      FileCreateDir,%A_ScriptDir%\scripts
      loop, %A_ScriptDir%\scripts\*.ahk,,1

      {

      _Golv=0

      loop,Parse,Golv,`n,`r ;增加过滤判断

      {

      StringReplace,_GolvPath,A_LoopField,`%A_ScriptDir`%,%A_ScriptDir%

      IfInString,A_LoopFileLongPath ,%_GolvPath%

      {

      _Golv=1

      break

      }

      }

      if _Golv=1

      continue

      if !(A_LoopFileLongPath~=”i).+?\\scripts\\[^\\]*\\?[^\\]+\.ahk”) ;增加一层子文件读取

      continue

      StringReplace, MenuName, A_LoopFileName, .ahk

      scriptCount += 1

      %MenuName%_Path :=A_LoopFileLongPath

      %MenuName%_Dir :=A_LoopFileDir

      scriptsName%scriptCount% := A_LoopFileName

      ;scriptsOpened%scriptCount% = 0

      UnOpenList.Insert(MenuName)

      }

      InsertionSort(UnOpenList)

      for Index, MenuName in UnOpenList

      {

      LV_Add(“”,MenuName)

      }

      LV_ModifyCol()

      gosub tsk_openAll

      ;Gui,Show

      return

      运行:

      if A_GuiEvent = DoubleClick

      {

      goto,tsk_open

      }

      return

      运行2:

      if A_GuiEvent = DoubleClick

      goto,tsk_close

      return

      GuiContextMenu: ; 运行此标签来响应右键点击或按下 Appskey.

      if A_GuiControl = ScriptLibrary ; 这个检查是可选的. 让它只为 ListView 中的点击显示菜单.

      {

      Gui,Default

      Gui,ListView,ScriptLibrary

      RowNumber = 0

      loop,%scriptCount%

      {

      RowNumber := LV_GetNext(RowNumber)

      if not RowNumber

      return

      break

      }

      Menu,PopC,Add,编辑,P_edit

      Menu,PopC,Add,运行,tsk_open

      Menu,PopC,Show

      return

      }

      if A_GuiControl = ScriptRun

      {

      Gui,Default

      Gui,ListView,ScriptRun

      RowNumber = 0

      loop,%scriptCount%

      {

      RowNumber := LV_GetNext(RowNumber)

      if not RowNumber

      return

      break

      }

      Menu,PopC2,Add,编辑,P_edit

      Menu,PopC2,Add,重载,tsk_restart

      Menu,PopC2,Add,关闭,tsk_close

      Menu,PopC2,Show

      return

      }

      return

      P_edit:

      LV_GetText(thisScript, RowNumber)

      P_editpath :=%thisScript%_path

      Run, F:\Program Files\AutoHotkey\SciTE\SciTE.exe “%P_editpath%”

      return

      tsk_open:

      Gui,Default

      Gui,ListView,ScriptLibrary

      RowNumber = 0

      loop,%scriptCount%

      {

      RowNumber := LV_GetNext(RowNumber)

      if not RowNumber

      return

      LV_GetText(thisScript, RowNumber)

      Run,% %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

      IfInString, thisScript, #

      {

      Gui, Hide

      return

      }

      ;scriptsOpened%A_Index% := 1

      break

      }

      Gui,ListView,ScriptRun

      LV_Add(“”,ThisScript)

      LV_ModifyCol()

      Gui,ListView,ScriptLibrary

      loop, %scriptCount%

      {

      LV_GetText(outputname,A_Index,1)

      if (outputname=ThisScript)

      {

      LV_Delete(A_Index)

      if A_Index1

      {

      LV_Modify(A_Index-1, “Select”)

      }

      else

      {

      LV_Modify(1, “Select”)

      }

      break

      }

      }

      LV_ModifyCol()

      return

      tsk_close:

      Gui,Default

      Gui,ListView,ScriptRun

      RowNumber = 0

      loop,%scriptCount%

      {

      RowNumber := LV_GetNext(RowNumber)

      if not RowNumber

      return

      LV_GetText(thisScript, RowNumber)

      ID:=%thisScript%

      WinClose, ahk_pid %ID%

      IfWinExist,ahk_pid %ID%

      Process,Close,%ID%

      ;scriptsOpened%A_Index% := 0

      break

      }

      Gui,ListView,ScriptLibrary

      LV_Add(“”,ThisScript)

      LV_ModifyCol()

      Gui,ListView,ScriptRun

      loop, %scriptCount%

      {

      LV_GetText(outputname,A_Index,1)

      if (outputname=thisScript)

      {

      LV_Delete(A_Index)

      if A_Index1

      {

      LV_Modify(A_Index-1, “Select”)

      }

      else

      {

      LV_Modify(1, “Select”)

      }

      break

      }

      }

      LV_ModifyCol()

      return

      tsk_restart:

      Gui,Default

      Gui,ListView,ScriptRun

      RowNumber = 0

      loop,%scriptCount%

      {

      RowNumber := LV_GetNext(RowNumber)

      if not RowNumber

      return

      LV_GetText(thisScript, RowNumber)

      ID:=%thisScript%

      WinClose, ahk_pid %ID%

      IfWinExist,ahk_pid %ID%

      Process,Close,%ID%

      Run,% %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

      break

      }

      return

      tsk_openAll:

      loop, %scriptCount%

      {

      thisScript := scriptsName%A_Index%

      StringReplace, thisScript, thisScript, .ahk

      ;if scriptsOpened%A_Index% = 0

      ;{

      IfInString, thisScript, _ ;IfInString,%thisScript%_Path,%A_ScriptDir%\Scripts\_ 不自动启动_文件夹内的脚本

      {

      continue

      }

      IfInString, thisScript, #

      {

      continue

      }

      Run, % %thisScript%_Path,% %thisScript%_Dir,,%thisScript%

      ;scriptsOpened%A_Index% = 1

      Gui,Default

      Gui,ListView,ScriptRun

      LV_Add(“”,thisScript)

      LV_ModifyCol()

      Gui,ListView,ScriptLibrary

      loop, %scriptCount%

      {

      LV_GetText(outputname,A_Index,1)

      if (outputname=thisScript)

      {

      LV_Delete(A_Index)

      break

      }

      }

      LV_ModifyCol()

      ;}

      }

      ;Gui,Show

      return

      Menu_Tray_过滤:

      Run, Notepad.exe 过滤.ini

      return

      Menu_Tray_OpenDir:
      FileCreateDir,%A_ScriptDir%\scripts
      Run, %A_ScriptDir%\scripts

      Gui,Hide

      return

      Menu_Tray_Reload:

      Gui,Hide

      Gui,Default

      Gui,ListView,ScriptRun

      loop % LV_GetCount()

      {

      LV_GetText(thisScript, A_Index)

      ID:=%thisScript%

      WinClose, ahk_pid %ID%

      IfWinExist,ahk_pid %ID%

      Process,Close,%ID%

      }

      Reload

      return

      GuiEscape:

      GuiClose:

      Gui, Hide

      return

      ExitSub:

      MsgBox,260,是否退出？,退出脚本,将退出所有经过AHK管理器启动的脚本，你是否确认退出？

      IfMsgBox No

      return

      Gui,Hide

      Gui,Default

      Gui,ListView,ScriptRun

      loop % LV_GetCount()

      {

      LV_GetText(thisScript, A_Index)

      ID:=%thisScript%

      WinClose, ahk_pid %ID%

      IfWinExist,ahk_pid %ID%

      Process,Close,%ID%

      }

      Gui,Destroy

      ExitApp

      return

      InsertionSort(ByRef array)

      {

      target := Array()

      count := 0

      for Index, Files in array

      {

      files%Index% := Files

      count += 1

      }

      j := 2

      while (j = 0 && key < files%i%)

      {

      k := i+1

      files%k% := files%i%

      i -= 1

      }

      k := i+1

      files%k% := key

      j += 1

      }

      loop, %count%

      {

      target.Insert(files%A_Index%)

      }

      array := target

      }

      About:

      MsgBox,AHK管理器`n版本号：2016.4.24`nCopyRight?2016 Sixtyone. All Rights Reserved.`n`n关于作者:`n`tName:Sixtyone`n`tQQ:576642385

      return

      Help:

      MsgBox,将AHK脚本放在脚本目录下进行管理:`n1.以_开头的脚本不会自动加载`n2.以#开头的脚本为临时脚本即运行完就退出`n3.脚本名字不能有空格及除_、#以为的符号`n4.脚本不能为快捷方式

      return

      F1::
      isShow:=!isShow
      if(isShow)
      {
      ShowGui:

      Gui,Show,,AHK管理器
      }
      else
      Gui,Hide
      return

      ;~ 作者：sixtyone
      ;~ 链接：https://www.jianshu.com/p/d88f47fa431d
      ;~ 來源：简书
      ;~ 简书著作权归作者所有，任何形式的转载都请联系作者获得授权并注明出处。

      ;~ 这个管理器我比较喜欢，我现在已设置为跟随系统自动启动的脚本

      ;~ 根据具体情况我做了如下修改

      ;~ 修改1：
      ;~ F1::
      ;~ isShow:=!isShow
      ;~ if(isShow)
      ;~ {
      ;~ ShowGui:

      ;~ Gui,Show,,AHK管理器
      ;~ }
      ;~ else
      ;~ Gui,Hide
      ;~ return

      ;~ 作者：sixtyone

      ;~ 修改2：
      ;~ UnOpenList := Array()
      ;~ FileCreateDir,%A_ScriptDir%\scripts
      ;~ loop, %A_ScriptDir%\scripts\*.ahk,,1

      ;~ 修改3：
      ;~ Menu_Tray_OpenDir:
      ;~ FileCreateDir,%A_ScriptDir%\scripts
      ;~ Run, %A_ScriptDir%\scripts

      ;~ 修改4：
      ;~ 脚本名字不能有空格及除_、#以外的符号

    • aahk

      修改5：

      LV_GetText(thisScript, RowNumber)

      P_editpath :=%thisScript%_path

      Run, D:\DIYTOOLS\AutoHotkey\SciTE\SciTE.exe “%P_editpath%”

❯

解锁会员权限

开通会员

解锁海量优质VIP资源

立刻开通
个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索
客服

  • 扫码打开当前页

返回顶部