個人日常行為准則
personal-daily-code-of-conduct
2022.01.28
本文博客鏈接1：
https://blog.51cto.com/ds920/4974843
本文博客鏈接2：
https://www.autoahk.com/archives/39563
本文博客鏈接3：
https://www.cnblogs.com/delphixx/p/15850327.html
本文博客鏈接4：
https://gitee.com/ds920/personal-daily-code-of-conduct/Edit/master/README.md
本文博客鏈接5：
https://docs.qq.com/doc/DSVF2bWFRZ1BxRE5Y
一、健康管理
1、步行上下班通勤，多走多動，適量喝水。
2、提高穿衣、飲水、吃飯、居住環境、出行、睡覺、通訊聯系交流的品質和數量。
3、科學合理的調整、改善、優化內心心理健康環境和外在的創作、生產、工作、生活、交流和娛樂的環境。
4、根據健康管理師教材內容科學合理的調整個人的日常行為。
二、個人信息管理方案
1、活動時間和電子文件管理總體規划：
用我的488手機號登錄的印象筆記中的超級筆記管理日常創作、工作、生活、交際和娛樂的日常活動時間安排筆記，注意：這里登錄的是國內的印象筆記賬號，不是登錄到Evernote International，登錄印象筆記用的手機號碼是138#####488，登錄印象筆記用的密（口）碼（令）是PRQ-x???6###.?-851。
用"ES文件瀏覽器"安卓應用、"RaiDrive_Standard_Edition_2021.10.9"連接群暉NAS的WebDAV文件服務和Synology_Secure_Signln批准登錄群暉QuickConnect這3種方式管理群暉DS920+網絡存儲服務器中的電子文件。
2、以兩項工具軟件為主，以其他工具軟件為輔助：
在使用印象筆記管理日常活動時間安排和使用群暉DS920+網絡存儲服務器管理電子文件以外可以使用騰訊文檔、阿里雲盤、騰訊QQ、騰訊微信、電腦桌面等應用程序軟件作為電子文件管理的輔助工具。由於有道雲筆記、騰訊文檔、阿里雲盤中的在線文檔、騰訊QQ、騰訊微信等應用軟件沒有“批量搜索正文內容”的功能，所以我不使用這些軟件來記錄日常活動時間安排筆記,所以我只好選擇使用印象筆記，印象筆記是最好的選擇，因為印象筆記能夠“批量搜索正文內容”。現在絕大多數雲存儲文檔筆記管理軟件都具有實時自動保存編輯內容和多種類型物理終端實時雙向同步的功能，主要區別在於能否“批量搜索正文內容”，鑒於此，我果斷選擇使用印象筆記。
3、一些使用規定和習慣：
印象筆記只用於記錄備忘雲筆記，不做他用。
每月1日新建一個筆記文件，並置頂當月筆記。
筆記標題格式為：“備忘印象筆記202201”。
備忘記錄格式為：“正方形復選框&4位數月日&記錄內容（重點&時間&地點）”
備忘記錄舉例：“□0127黨員冬訓大會27日9:30總部三樓”
群暉DS920+網絡存儲服務器使用群暉自帶的DDNS和華碩路由器自帶的免費動態域名解析，這兩種動態域名解析同時運行互為容災備份。端口映射轉發端口選用5位數冷門端口號。群暉DS920+網絡存儲服務器使用4塊容量為16TB的機械硬盤組建RAID1鏡像，並啟用共享文件夾的回收站功能，從而有效的保護文件數據，有效防止發生因為用戶誤操作或者機械磁盤損壞引起的丟失文件數據事件的發生。
三、電腦軟件管理
1、根據不同電腦軟件的特點進行合理分類並壓縮打包制作自動靜默安裝包或綠色單文件免安裝自解壓exe可執行文件。除了Windows操作系統和少量需重啟的軟件以外，絕大多數電腦軟件應當在鼠標單次雙擊時能顯示並激活主窗口或者實現主要功能（無需按下一步按鈕或者按回車鍵）。
2、電腦軟件的默認安裝目的文件路徑為：D:\Program\軟件名稱\軟件名稱.exe
軟件名稱選擇軟件主窗口標題的一部分或者全部，優先使用英文名稱。
電腦軟件類別1：當電腦軟件無需安裝、沒有個性化配置、沒有數據文件並且小於100MB時直接采用TempMod臨時解壓模式運行。
【靜默安裝實例1】：eXeScope無用戶數據和用戶配置所以采用解壓縮到臨時文件夾的方法壓縮打包（由於eXeScope會產生ini配置文件，為了文件夾D:\Program的整潔所以壓縮打包）
;下面的注釋包含自解壓腳本命令
Setup=eXeScope.exe
TempMode
Silent=1
Overwrite=1
電腦軟件類別2：當電腦軟件無需安裝並且有個性化配置或者有數據文件或者大於100MB時先解壓縮到文件夾D:\Program\軟件名稱然后再運行電腦軟件。
【靜默安裝實例2】：自動靜默安裝KeePass、解壓縮自定義配置文件KeePass.config.xml並運行KeePass連接堅果雲或者群暉NAS的WebDAV文件服務統一集中管理網址用戶名密（口）碼（令）備忘記錄
;下面的注釋包含自解壓腳本命令
;Path=解壓縮路徑
;Presetup=解壓縮前運行
;Setup=解壓縮后運行
;Silent=靜默方式:1-隱藏全部 2-隱藏啟動對話框 空着不設置-顯示全部
;Overwrite=覆蓋方式:1-覆蓋全部文件 2-跳過已存在的文件 空着不設置-覆蓋前詢問
;請選擇正確的圖標並保存正確的配置文件
Path=D:\Program\KeePass
Setup=KeePass.exe
Silent=1
Overwrite=2
電腦軟件類別3：當電腦軟件需安裝后才能使用時用帶/s或者/silent參數的批處理腳本自動靜默安裝電腦軟件然后再運行電腦軟件。
【靜默安裝實例3】：自動靜默安裝AutoHotkey和SciTE4AutoHotkey並設置ahk文件關聯和ahk文件的右鍵中文菜單
;下面的注釋包含自解壓腳本命令
;Path=解壓縮路徑
;Presetup=解壓縮前運行
;Setup=解壓縮后運行
;Silent=靜默方式:1-隱藏全部 2-隱藏啟動對話框 空着不設置-顯示全部
;Overwrite=覆蓋方式:1-覆蓋全部文件 2-跳過已存在的文件 空着不設置-覆蓋前詢問
;請選擇正確的圖標並保存正確的配置文件
Path=D:\Program\AutoHotkey
Setup=Silent_Setup.bat
Silent=2
Overwrite=2
REM /*
REM =======================================================
REM Silent_Setup.bat - 自動靜默安裝AutoHotkey和SciTE4AutoHotkey的批處理腳本
REM
REM 文件 : D:\Program\AutoHotkey\Silent_Setup.bat
REM
REM 腳本作者 : ds920
REM 最新版本 : 1.0.1
REM 更新時間 : 2022年1月26日
REM
REM 項目主頁 : https://gitee.com/ds920
REM
REM 用法: (需要Windows系統的電腦)
REM 1. 鼠標雙擊用WinRAR x86 32位 壓縮軟件 打包成的SFX自解壓exe可自行自動靜默安裝包文件
REM
REM =======================================================
REM */
START "" "%~dp0"AutoHotkey_1.1.33.10_setup.exe /S /A32 /U32 /U64 /D=D:\Program\AutoHotkey\ /WAIT
REM 等待3秒鍾，以便讓AHK文件關聯生效，使ahk腳本能夠順利運行
ping -n 3 127.0.0.1>nul 2>nul
REM 設置AHK文件關聯、漢化AHK文件右鍵菜單(運行腳本、編譯腳本、編譯腳本(Gui)、編輯腳本)
REM 腳本說明： 此工具用來修改 AutoHotkey 腳本的右鍵菜單關聯，適用於 AutoHotkey 安裝版、綠色版。
REM 作者： 甲殼蟲<jdchenjian@gmail.com>
REM 修改作者： 兔子
REM 修改作者： ds920
START "" "%~dp0"SciTE\_Linked.ahk
/*
作者： 甲殼蟲<jdchenjian@gmail.com>
博客： http://hi.baidu.com/jdchenjian
腳本說明： 此工具用來修改 AutoHotkey 腳本的右鍵菜單關聯，適用於 AutoHotkey 安裝版、綠色版。
腳本版本： 2009-01-21
修改作者： 兔子
更新說明：
2010.01.09 之前某個時間，修改AHK路徑、編輯器路徑、編譯器路徑，默認全部在當前目錄下尋找
2010.01.09 去掉默認在新建菜單的勾
2010.06.21 如果SCITE為默認編輯器，則復制個人配置文件“SciTEUser.properties”到%USERPROFILE%
2010.06.25 修正因#NoEnv使%USERPROFILE%變量直接引用無效
2016.04.18 刪除“2010.06.21”的改動
2021.10.17 新增“編譯腳本 (GUI)”的漢化
2021.11.02 自動根據 AutoHotkey.exe 的位置定位基准目錄。
2021.11.05 重構代碼，精簡界面，修復新建模板時的編碼問題，修復編輯模板時的權限問題。
修改作者 ： ds920
; ===== ds920 修改 2022年1月11日 ===== 第31行 =====
; ===== ds920 修改 2022年1月11日 ===== 第124行 =====
; ===== ds920 修改 2022年1月11日 ===== 第189到191行 =====
; ===== ds920 修改 2022年1月11日 ===== 第242行 =====
更新說明：
2022.01.11 注釋掉部分AutoHotkey語句，讓其他腳本能夠靜默調用此AHK腳本，
實現AHK文件關聯和漢化鼠標右鍵中文菜單
2022.01.11 #SingleInstance, force 改成 #SingleInstance, Ignore 防止出現等待的提示窗口
*/
#NoEnv
; ===== ds920 修改 2022年1月11日 ===== 第31行 =====
#SingleInstance, Ignore
SendMode Input
SetWorkingDir %A_ScriptDir%
; 版本(僅用於顯示）
Script_Version=ver. 1.1
; AutoHotkey 原版的相關信息寫在注冊表HKCR主鍵中，
; 嘗試當前用戶否有權操作該鍵，如果無權操作HKCR鍵（受限用戶），
; 可通過操作注冊表HKCU鍵來實現僅當前用戶關聯AHK腳本。
RegWrite, REG_SZ, HKCR, .test
if ErrorLevel
IsLimitedUser:=1
RegDelete, HKCR, .test
if ErrorLevel
IsLimitedUser:=1
if IsLimitedUser
{
RootKey=HKCU ; 受限用戶操作HKCU鍵
Subkey=Software\Classes\ ; 為簡化后面的腳本，此子鍵須以“\”結尾
}
else
{
RootKey=HKCR ; 非受限用戶操作HKCR鍵
Subkey=
}
; 檢查是否存在AHK注冊表項
RegRead, FileType, %RootKey%, %Subkey%.ahk
if (FileType!="")
{
RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Open\Command ; AHK路徑
AHK_Path:=PathGetPath(value)
RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command ; 編譯器路徑
Compiler_Path:=PathGetPath(value)
RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Edit\Command ; 編輯器路徑
Editor_Path:=PathGetPath(value)
RegRead, Template_Name, %RootKey%, %Subkey%.ahk\ShellNew, FileName ; 模板文件名
}
else
FileType=AutoHotkeyScript
; 通過 AutoHotkey.exe 的位置來定位基准目錄
SplitPath, A_AhkPath, , AhkDir
if AHK_Path=
{
IfExist, %AhkDir%\AutoHotkey.exe
AHK_path=%AhkDir%\AutoHotkey.exe
}
if Compiler_Path=
{
IfExist, %AhkDir%\Compiler\Ahk2Exe.exe
Compiler_Path=%AhkDir%\Compiler\Ahk2Exe.exe
}
if Editor_Path=
{
IfExist, %AhkDir%\SciTE\SciTE.exe
Editor_Path=%AhkDir%\SciTE\SciTE.exe
}
if Template_Name=
Template_Name=Template.ahk
Gui, Font, bold s15
Gui, Add, Text, x10 y10 w480 h290, %A_Space%設置並漢化 .ahk 文件的右鍵菜單
Gui, Font
Gui, Add, GroupBox, x20 y50 w460 h50 , “運行腳本”
Gui, Add, Edit, x35 y70 w340 h20 vAHK_Path, %AHK_path%
Gui, Add, Button, x385 y70 w40 h20 gFind_AHK, 瀏覽
Gui, Add, GroupBox, x20 y110 w460 h50 , “編譯腳本”
Gui, Add, Edit, x35 y130 w340 h20 vCompiler_Path, %Compiler_Path%
Gui, Add, Button, x385 y130 w40 h20 gChoose_Compiler, 瀏覽
Gui, Add, Button, x430 y130 w40 h20 gDefault_Compiler, 默認
Gui, Add, GroupBox, x20 y170 w460 h50 , “編輯腳本”
Gui, Add, Edit, x35 y190 w340 h20 vEditor_Path, %Editor_Path%
Gui, Add, Button, x385 y190 w40 h20 gChoose_Editor, 瀏覽
Gui, Add, Button, x430 y190 w40 h20 gDefault_Editor, 默認
Gui, Add, GroupBox, x20 y230 w460 h50 , “新建腳本”
Gui, Add, Button, x35 y250 w340 h20 gEdit_Template, 自定義新建腳本的模板
Gui, Font, bold s15
Gui, Add, Button, x20 y300 w200 h40 default gInstall, 設置
Gui, Add, Button, x280 y300 w200 h40 gCancel, 取消
; ===== ds920 修改 2022年1月11日 ===== 第124行 =====
gosub, Install
if (A_Args.1="/set")
gosub, Install
else
Gui, Show, x250 y200 h350 w500 Center, AHK 腳本關聯工具 %Script_Version%
return
GuiClose:
GuiEscape:
Cancel:
ExitApp
return
; 查找 AutoHotkey 主程序
Find_AHK:
Gui +OwnDialogs
FileSelectFile, AHK_Path, 3, , 查找 AutoHotkey.exe, AutoHotkey.exe
if (AHK_Path!="")
GuiControl,,AHK_Path, %AHK_Path%
gosub Default_Compiler
return
; 選擇腳本編譯器
Choose_Compiler:
Gui +OwnDialogs
FileSelectFile, Compiler_Path, 3, , 選擇腳本編譯器, 程序(*.exe)
if (Compiler_Path!="")
GuiControl,,Compiler_Path, %Compiler_Path%
return
; 默認腳本編譯器
Default_Compiler:
GuiControlGet, AHK_Path
SplitPath, AHK_Path, ,AHK_Dir
IfExist, %AHK_Dir%\Compiler\Ahk2Exe.exe
{
Compiler_Path=%AHK_Dir%\Compiler\Ahk2Exe.exe
GuiControl,, Compiler_Path, %Compiler_Path%
}
return
; 選擇腳本編輯器
Choose_Editor:
Gui +OwnDialogs
FileSelectFile, Editor_Path, 3, , 選擇腳本編輯器, 程序(*.exe)
if (Editor_Path!="")
GuiControl,,Editor_Path, %Editor_Path%
return
; 默認腳本編輯器
Default_Editor:
IfExist, %AhkDir%\SciTE\SciTE.exe
Editor_Path=%AhkDir%\SciTE\SciTE.exe
else ifExist, %A_WinDir%\system32\notepad.exe
Editor_Path=%A_WinDir%\system32\notepad.exe
GuiControl,, Editor_Path, %Editor_Path%
return
; 設置
Install:
Gui, Submit
; ===== ds920 修改 2022年1月11日 ===== 第189到191行 =====
AHK_Path:="D:\Program\AutoHotkey\AutoHotkey.exe"
Compiler_Path:="D:\Program\AutoHotkey\Compiler\Ahk2Exe.exe"
Editor_Path:="D:\Program\AutoHotkey\SciTE\SciTE.exe"
IfNotExist, %AHK_Path%
{
MsgBox, 16, , AutoHotkey 路徑錯誤 ！
return
}
IfNotExist, %Compiler_Path%
{
MsgBox, 16, , 編譯器路徑錯誤 ！
return
}
IfNotExist, %Editor_Path%
{
MsgBox, 16, , 編輯器路徑錯誤 ！
return
}
; 寫入注冊表
RegWrite, REG_SZ, %RootKey%, %Subkey%.ahk,, %FileType%
RegWrite, REG_SZ, %RootKey%, %Subkey%.ahk\ShellNew, FileName, %Template_Name%
IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
gosub Create_Template
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%,, AutoHotkey 腳本
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\DefaultIcon,, %AHK_Path%`,1
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell,, Open
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Open,, 運行腳本
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Open\Command,, "%AHK_Path%" "`%1" `%*
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile,, 編譯腳本
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile-Gui,, 編譯腳本 (Gui)
IfInString, Compiler_Path, Ahk2Exe.exe
{
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command,, "%Compiler_Path%" /in "`%1"
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile-Gui\Command,, "%Compiler_Path%" /Gui /in "`%1"
}
else
{
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command,, "%Compiler_Path%" "`%1"
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile-Gui\Command,, "%Compiler_Path%" /Gui "`%1"
}
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Edit,, 編輯腳本
RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Edit\Command,, "%Editor_Path%" "`%1"
; ===== ds920 修改 2022年1月11日 ===== 第242行 =====
; MsgBox, 64, , 設置完畢 ！
ExitApp
return
; 編輯腳本模板
Edit_Template:
GuiControlGet, Editor_Path
IfNotExist, %Editor_Path%
{
MsgBox, 64, , 腳本編輯器路徑錯誤 ！
return
}
IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
gosub Create_Template
IfExist, %A_WinDir%\system32\notepad.exe
Run, *RunAs notepad.exe %A_WinDir%\ShellNew\%Template_Name%
else
Run, *RunAs %Editor_Path% %A_WinDir%\ShellNew\%Template_Name%
return
; 新建腳本模板
Create_Template:
FileAppend,
(
#NoEnv
SendMode Input
SetWorkingDir `%A_ScriptDir`%
), %A_WinDir%\ShellNew\%Template_Name%, UTF-8
IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
MsgBox, 64, , 無法創建腳本模板 ！`n`n請嘗試使用管理員權限運行本工具。
return
; 從注冊表值字符串中提取路徑
PathGetPath(pSourceCmd)
{
local Path, ArgsStartPos = 0
if (SubStr(pSourceCmd, 1, 1) = """")
Path := SubStr(pSourceCmd, 2, InStr(pSourceCmd, """", false, 2) - 2)
else
{
ArgsStartPos := InStr(pSourceCmd, " ")
if ArgsStartPos
Path := SubStr(pSourceCmd, 1, ArgsStartPos - 1)
else
Path = %pSourceCmd%
}
return Path
}
; 此文件的完整路徑：D:\Program\AutoHotkey\SciTE\user\UserToolbar.properties
; SciTE4AutoHotkey toolbar user settings file
;
; You are encouraged to edit this file!
;
; Tool definitions are in the following format:
; =Tool Name|Command line|Hotkey (optional)|Icon (optional)
; Paths support the following variables:
; %FILENAME% represents the filename of the current script
; %FILEPATH% represents the path to the current script
; %FULLFILENAME% represents the path and filename of the current script
; %SCITEDIR% represents the directory where SciTE resides
; %USERDIR% represents the user SciTE directory (My Documents\AutoHotkey\SciTE)
; %PLATFORM% represents the active platform
; %LOCALAHK% is the path of SciTE4AutoHotkey's internal copy of AutoHotkey.exe
; %AUTOHOTKEY% is the path of AutoHotkey.exe
; %ICONRES% is the toolbar icon library
; Use - or -- to add separators.
; Place here your tools
; Place here your scriptlets (required by the Scriptlet Utility)
;--
;=代碼格式化 (Auto-Syntax-Tidy) (Ctrl+4)|%LOCALAHK% tools\Auto-Syntax-Tidy\Auto-Syntax-Tidy_v12.ahk|^4
--
=窗口信息( AHKInfo 1.3.5 )|%SCITEDIR%\tools\AHKInfo\AHKInfo.ahk||%ICONRES%,9
=窗口信息(ViewWizard)|%SCITEDIR%\tools\ViewWizard\ViewWizard.exe||%SCITEDIR%\tools\ViewWizard\ico-viewwizard.ico
=窗口信息(WindowSpy)|%SCITEDIR%\tools\WindowSpy\WindowSpy.ahk||%ICONRES%,8
=窗口信息(AU3_Spy)|%SCITEDIR%\tools\AU3_Spy\AU3_Spy.exe||%ICONRES%,12
=顏色信息(ColorFinder)|%SCITEDIR%\tools\ColorFinder\ColorFinder.exe||%ICONRES%,10
=提取圖標修改資源(eXeScope)|%SCITEDIR%\tools\eXeScope\eXeScope.exe||%SCITEDIR%\tools\eXeScope\eXeScope.ico
=類別標識符(CLISD)|%SCITEDIR%\tools\CLISD\CLISD.exe||%ICONRES%,7
--
=宏錄制(Au3Record)|%SCITEDIR%\tools\Au3Record\Au3Record.exe||%SCITEDIR%\tools\Au3Record\Au3Record.ico
=宏錄制(AutoScriptWriter)|%SCITEDIR%\tools\AutoScriptWriter\AutoScriptWriter.exe||%SCITEDIR%\tools\AutoScriptWriter\AutoScriptWriter.ico
=宏錄制(PuloversMacroCreator)(Ctrl+1)|%SCITEDIR%\tools\MacroCreator\MacroCreator.exe||%SCITEDIR%\tools\MacroCreator\ico-MacroCreator.ico
--
--
=愛碼源碼倉庫(Ctrl+3)|%SCITEDIR%\tools\iCodeRepository3\iCodeRepository3.exe||%SCITEDIR%\tools\iCodeRepository3\iCodeRepository3.ico
;=窗口信息工具 (AHK_Window_Info) (Ctrl+6)|%SCITEDIR%\..\AutoHotkeyU32.exe tools\AHK_Window_Info\AHK_Window_Info_v1.7.ahk|^6|%ICONRES%,9
【靜默安裝實例4】：自動靜默安裝Maye、TotalCommander、Everything和印象筆記並設置快捷鍵
Maye一個簡潔小巧的快速啟動工具
https://blog.arae.cc/post/25830.html
https://github.com/25H/Maya/releases/latest
https://www.lanzoux.com/b0bqwqjvg
由於TotalCommander、Everything和印象筆記需要通過Maye設置快捷鍵所以這4個軟件合並在一起打包成單個exe可自行壓縮包程序。
激活Maye主窗口的快捷鍵設置為默認的{Alt}+空格
激活TotalCommander主窗口的快捷鍵設置為`(即~鍵，此鍵位於主鍵盤區數字1的左邊)
激活Everything主窗口的快捷鍵設置為{F8}
激活印象筆記主窗口的快捷鍵設置為{F10}
;下面的注釋包含自解壓腳本命令
Path=D:\Program
Setup=D:\Program\Maye\Maye.exe
Silent=2
Overwrite=2
;
;/*
; D:\Program\TotalCMD\Run.ahk
;===========================================
; 設置激活或者隱藏 Total Commander 10.00 主窗口的快捷鍵為 F8
; https://www.autoahk.com/archives/37780
; https://www.cnblogs.com/delphixx/p/15718194.html
;
; 腳本作者 : ds920
; 最新版本 : 1.1
; 更新時間 : 2021年12月22日
;
; 用法: (需要最新版本 AHK v1.1.31+)
; 1. 到飛揚時空的新浪博客下載並安裝TotalCommander中文增強版到文件夾D:/TotalCMD
; 2. 將本腳本保存為"RunTC.ahk"並復制到D:/TotalCMD文件夾中
; 3. 使用Maye來設置RunTC.ahk的熱鍵為 F8
;
; 升級更新歷史:
; 版本1.0 2021年12月22日 新建 創建此AutoHotkey腳本並測試通過F8熱鍵功能
; 版本1.1 2021年12月22日 修改 調整刪除 SetTimer 定時器時判斷TC主窗口是否激活的順序
; 把基於窗口類的激活判斷語句"if(WinActive("ahk_class" TTOTAL_CMD))"放在最外層
; 防止有相同標題的窗口激活時（例如：相同標題的瀏覽器等等）窗口激活誤判
;
; 由於AutoHotkey的Hotkey語句設置的熱鍵必需在任務欄或者桌面進程激活時才有效,
; 所以請使用Maye來設置Total Commander的熱鍵 F8
; https://blog.arae.cc/post/25830.html
; https://github.com/25H/Maya/releases/
;
; 可以用 Total Commander 訪問用RaiDrive異地遠程連接群暉WebDAV文件服務並映射成的本地虛擬磁盤盤符 Z: 分區
; 可以用 Total Commander 訪問用NetDrive2異地遠程連接群暉SFTP文件服務並映射成的本地虛擬磁盤盤符 Y: 分區
; 可以用支持 Total Commander的WebDAV文件服務訪問插件異地遠程連接群暉WebDAV文件服務中的網絡共享文件夾
; 可以用KeePass或者KeePass2Android來連接堅果雲或者
; 群暉NAS的WebDAV文件服務來管理網址、用戶名、賬號、密（口）碼（令）、口令、暗號、紀念日等個人敏感隱私信息和數據
; 可以用FileZilla Pro 專業版軟件異地遠程連接群暉的WebDAV文件服務並
; 批量上傳文件夾到群暉的 RAID 1 鏡像存儲池中的共享文件夾之中
; 可以用騰訊文檔的電腦客戶端來新建在線文檔和在線表格來進行辦公文檔和辦公表格的分享和協作
; 可以用Bulk Rename Utility 2.7.1.2來批量重命名或者編號群暉WebDAV文件服務中的共享文件夾中的大量文件
; 可以用Double Killer Pro V 2.1.0.104來批量刪除群暉WebDAV文件服務中的共享文件夾中的重復文件
; 可以安裝並升級更新"火絨安全軟件"來防殺電腦病（木）毒（馬）木馬惡意軟件並攔截垃圾廣告彈出的騷擾窗口
; 可以用SGI備份還原映像總裁鏡像總裁一鍵還原工具軟件來備份保護Windows操作系統和
; 電腦中應用程序軟件和設置到GHO系統鏡像文件
; SGI備份還原映像總裁鏡像總裁一鍵還原工具軟件官方網址是 https://www.sysceo.com/Software-softwarei-id-253.html
; 以便今后用杏雨梨雲啟動維護系統可啟動固態U盤來恢復電腦系統應用程序軟件GHO系統鏡像文件到電腦的系統分區C盤
; 可以用Shadow Defender 影子衛士來保護Windows操作系統和電腦中應用程序軟件的設置,
; 防止電腦軟件設置被未授權的用戶和程序非法更改和破壞
; 如果無法安裝 Shadow Defender 影子衛士時可以用"DeepFreeze冰點還原精靈"或者
; "PowerShadow影子系統"或者"Returnil Virtual System(RVS)"來代替影子衛士
;
;===========================================
;*/
#SingleInstance,Ignore
loop,5
{
DetectHiddenWindows,On
Sleep,5
IfWinExist,QQ595076941_AutoAHKRun
ExitApp
}
Gui, Show, Hide,QQ595076941_AutoAHKRun
#Persistent
; #NoTrayIcon
DetectHiddenWindows,On
SetTitleMatchMode,2
; 設置激活或者隱藏 Total Commander 10.00 主窗口的快捷鍵為 F8
; Hotkey,F8,ActivateOrHideWindowHotkey
ActivateOrHideWindowHotkey()
return
; ——————————————————–
ActivateOrHideWindowHotkey()
{
; MsgBox,PressedHotkey檢測到已經按下快捷鍵
Sleep,5
IfWinActive,ahk_class TTOTAL_CMD
{
Sleep,5
if(WinActive(ahk_class TTOTAL_CMD))
{
Sleep,5
WinGetClass, MyClass, A
IfInString,MyClass,TTOTAL_CMD
{
Sleep,5
IfWinActive,Total Commander
{
TCTitle:="Total Commander"
Sleep,5
WinGetActiveTitle,Title
IfInString,Title,%TCTitle%
{
; MsgBox,MinimizeWindow最小化指定窗口
WinMinimize,Total Commander ahk_class TTOTAL_CMD
Sleep,5
ExitApp
}
}
}
}
}
else
{
; MsgBox,ActivateWindow顯示並且最大化並且激活指定窗口
SetTimer,ActivateWindowTimer,20
}
}
; ——————————————————–
;根據窗口類名顯示並激活Total Commander窗口
ActivateWindowTimer()
{
; 1、如果程序沒有運行則運行程序,這里我把可執行文件名改成了TotalCMD-v10.exe
Process,Exist,TotalCMD-v10.exe
if (%ErrorLevel%=0)
{
IfExist,D:/Program/TotalCMD/TotalCMD.exe
{
Run,D:/Program/TotalCMD/TotalCMD.exe
}
else
{
MsgBox,找不到文件 D:/Program/TotalCMD/TotalCMD.exe
return
}
}
; 2、顯示並激活（切換到）指定窗口
WinShow,Total Commander ahk_class TTOTAL_CMD
WinMove,Total Commander ahk_class TTOTAL_CMD,,0,0,A_ScreenWidth,A_ScreenHeight
WinActivate,Total Commander ahk_class TTOTAL_CMD
WinMaximize,Total Commander ahk_class TTOTAL_CMD
Sleep,5
DetectHiddenWindows,On
SetTitleMatchMode,2
WinGet, WinID, ID,Total Commander ahk_class TTOTAL_CMD
DllCall("SwitchToThisWindow", "UInt", WinID, "UInt", 1)
; 3、檢查指定窗口是否激活成功，
; 假如激活成功則退出Timer計時器循環執行，
; 如果激活失敗則繼續嘗試激活指定窗口
Sleep,5
IfWinActive,ahk_class TTOTAL_CMD
{
Sleep,5
if(WinActive(ahk_class TTOTAL_CMD))
{
Sleep,5
WinGetClass, MyClass, A
IfInString,MyClass,TTOTAL_CMD
{
Sleep,5
IfWinActive,Total Commander
{
TCTitle:="Total Commander"
Sleep,5
WinGetActiveTitle,Title
IfInString,Title,%TCTitle%
{
SetTimer,ActivateWindowTimer,Delete
Sleep,5
ExitApp
}
}
}
}
}
}
;================= The End =================
;
/*
;================= 根據窗口類名激活或者隱藏窗口的AutoHotkey函數 =================
; 請使用 窗口信息工具 AHKInfo 1.3.5 獲取窗口的類名
;根據窗口類名激活或者隱藏窗口
ActivateOrHideWindow(VarExeFileName:="TotalCMD-v10″,VarWinClassName:="TTOTAL_CMD")
{
; 1、如果程序沒有運行則運行程序
Process,Exist,%VarExeFileName%.exe
if (%ErrorLevel%=0)
{
IfExist,%VarExeFileName%.exe
{
Run,%VarExeFileName%.exe
return
}
else
{
MsgBox,找不到文件 %VarExeFileName%.exe
return
}
}
; 2、如果窗口未置頂則顯示並激活（切換到）指定窗口
IfWinNotActive,ahk_class %VarWinClassName%
{
loop,2
{
Sleep,50
WinShow,ahk_class %VarWinClassName%
;~ WinMaximize,ahk_class %VarWinClassName%
Sleep,50
WinGet, WinID, ID,ahk_class %VarWinClassName%
Sleep,50
DllCall("SwitchToThisWindow", "UInt", WinID, "UInt", 1)
}
return
}
; 3、如果窗口已經顯示並置頂則隱藏窗口
;~ WinMinimize,ahk_class %VarWinClassName%
WinHide,ahk_class %VarWinClassName%
}
*/
;
【靜默安裝實例5】：自動靜默安裝GoodSync壓縮解壓縮軟件
;下面的注釋包含自解壓腳本命令
Setup=GoodSync_Ent_11.10.1.1.exe /SILENT
TempMode
Silent=1
Overwrite=1
說明：由於這個GoodSync_Ent_11.10.1.1.exe文件是我收藏的 Cracked Silent Install Repack and Portable 版本，所以帶有自制的 /SILENT 參數。如果找不到稱心如意的電腦軟件也可以用Embarcadero.Delphi.11.0.v28.0.42600.6491.Lite.v17.0.zip或者Microsoft_Visual Studio
_Enterprise_2022_17.0.5.exe來自己制作一款完全符合自己使用習慣和使用要求的私人訂制的電腦應用程序軟件。
【靜默安裝實例6】：自動靜默安裝Delphi7到Windows11
; 無人值守全自動靜默安裝Delphi7到Windows11的AutoHotkey腳本2022年1月9日
; FileName := A_Setup_Delphi7.ahk
#SingleInstance,Ignore
loop,5
{
DetectHiddenWindows,On
Sleep,5
IfWinExist,E-Mail-595076941@QQ.COM
ExitApp
}
Gui, Show, Hide,E-Mail-595076941@QQ.COM
#Persistent
; #NoTrayIcon
DetectHiddenWindows,On
SetTitleMatchMode,2
; 啟動Delphi7安裝程序
SetTimer,SetupTimer,500
return
SetupTimer()
{
; 1、如果程序沒有運行則運行程序
Process,Exist,Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
if (%ErrorLevel%=0)
{
IfExist,%A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
{
Run,%A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
}
else
{
MsgBox,找不到文件 %A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
return
}
}
IfWinNotExist,安裝向導 - Delphi 7 Lite Full Edition,正在你的計算機中安裝 Delphi 7 Lite Full Edition，請稍等...
{
ControlSend, TNewButton1,{Space}, 選擇安裝語言 ahk_class TSelectLanguageForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
ControlSend, Button1,{Space}, 安裝向導 ahk_class #32770 ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 本程序為Window
ControlSend, TNewButton1,!n, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
ControlSend, TNewButton1,!i, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
}
IfWinExist,安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm,安裝向導已完成 Delphi 7 Lite Full Edition 的安裝
{
SetTimer,SetupTimer,Delete
ControlClick, TNewButton5, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp,安裝向導已完成 Delphi 7 Lite Full Edition 的安裝
MsgBox,,,已成功安裝Delphi7Lite編程軟件,2
ExitApp
}
}
在制作自動靜默安裝電腦軟件的AutoHotkey腳本時可以用測試一行或者幾行代碼的執行效果。
;
;
; AutoHotkey代碼測試助手
; 2022年1月15日
; By ds920
;
; 用法:
; 第1步:運行此腳本
; 第2步:在SciTE4AutoHotkey窗口中選中需要測試的代碼
; 第3步:按快捷鍵F4,此腳本會將選中的代碼復制到新的獨立的待測試腳本文件中
; 第4步:調整被測試相關窗口的位置和大小
; 第5步:按快捷鍵F6,開始測試選中的代碼,
; 由於選中的代碼通常只有一行或者幾行,
; 測試代碼很少具有針對性,
; 不易混淆,提高了測試效果和效率.
;
; 專注於測試一行或者少量的幾行代碼更容易測試成功並且得到正確的代碼語句
;
; 源代碼下載網址:
; https://gitee.com/ds920/CodeTestHelper
; https://www.cnblogs.com/delphixx/p/15806255.html
;
; 設置環境變量
#SingleInstance,force
#Persistent
#NoEnv
#WinActivateForce
;~ #NoTrayIcon
;~ #Warn
SetWorkingDir,%A_ScriptDir%
DetectHiddenWindows,On
SetTitleMatchMode,2
;
; 設置變量
global SciTE_Path
SciTE_Path:="D:\Program\AutoHotkey\SciTE"
global TestAHK_Name
global TestAHK_FullPath
;
; 創建熱鍵
Hotkey,F4,HotkeyF4
Hotkey,F6,HotkeyF6
ToolTip,請選中需要測試的AHK代碼 並按快捷鍵F4復制代碼
SetTimer, RemoveToolTip, -8000
;
return
;
HotkeyF4()
{
TestAHK_Name=Test_%A_YYYY%%A_MM%%A_DD%%A_Hour%%A_Min%%A_Sec%
TestAHK_FullPath=D:\AHKCode\TestCode\%TestAHK_Name%.ahk
Send,^c
FileCreateDir,D:\AHKCode\TestCode
FileAppend, ; 這里需要逗號.
(
#SingleInstance,force
#Persistent
#NoEnv
#WinActivateForce
;~ #NoTrayIcon
;~ #Warn
SetWorkingDir,%A_ScriptDir%
DetectHiddenWindows,On
SetTitleMatchMode,2
;
), %TestAHK_FullPath%
; MsgBox,%TestAHK_FullPath%
Run,%SciTE_Path%\SciTE.exe %TestAHK_FullPath%
Sleep,1000
Send,^{End}
Sleep,200
Send,{Enter 2}
Sleep,500
Send,^v
ToolTip,保存腳本之后 按快捷鍵F6開始測試
SetTimer, RemoveToolTip, -8000
}
;
HotkeyF6()
{
ToolTip,測試編號:%TestAHK_Name%
; Send,^s
Run,%TestAHK_FullPath%
SetTimer, RemoveToolTip, -8000
}
;
RemoveToolTip:
ToolTip
return
;
; MsgBox,Msg123
;
; 我會在空余時間用微軟的 Visual Studio 2015 簡體中文版中的 C++ 語言 和
; 簡體中文漢化版 Embarcadero.Delphi.11.0.v28.0.42600.6491.Lite.v17.0 中的Pascal 語言
; 重新制作,重構,優化,測試,改進,分享,發布此"代碼測試工具"
;
; 使得此"代碼測試工具"能夠輔助 AutoHotkey,AutoIT,
; C++(Visual Studio 2015 簡體中文版),Pascal(Embarcadero.Delphi.11.0簡體中文漢化版),
; Python,JAVA 和 C# 的代碼編程制作開發科學研究測試部署.
; 常見的窗口PSY嗅探檢測工具有:
; 001-星雨朝霞的AHKInfo 1.3.5
; 002-FindText()8.6- 屏幕抓字生成字庫工具與找字函數——FeiYue
; 003-ViewWinzard 2.63
; 004-WindowSpy
; 005-AHK_Window_Info
; 006-Spy++
; 007-MacroCreator
; 008-AU3Record
; 009-AutoScriptWrite
; 010-PuloversMacroCreator
/*
; 我常用的SetTimer循環操作代碼結構
; ----- 1 -----
#SingleInstance,Ignore
#Persistent
runwith("admin")
loop,5
{
DetectHiddenWindows,On
Sleep,5
IfWinExist,7z-E-Mail-595076941@QQ.COM
ExitApp
}
Gui, Show, Hide,7z-E-Mail-595076941@QQ.COM
DetectHiddenWindows,On
SetTitleMatchMode,2
; 啟動7z安裝程序
SetTimer,SetupTimer,500
return
SetupTimer()
{
; 1、如果程序沒有運行則運行程序
Process,Exist,7z2106.exe
if (%ErrorLevel%=0)
{
IfExist,%A_ScriptDir%\7z2106.exe
{
Run,%A_ScriptDir%\7z2106.exe
}
else
{
MsgBox,找不到文件 %A_ScriptDir%\7z2106.exe
return
}
}
ControlSend, Button2,{Space}, 7-Zip 21.06 Setup ahk_class #32770 ahk_exe 7z2106.exe, Cancel
Sleep,2000
IfWinExist,7-Zip,installed
{
SetTimer,SetupTimer,Delete
ControlSend, Button2,{Space}, 7-Zip 21.06 Setup ahk_class #32770 ahk_exe 7z2106.exe, Cancel
MsgBox,,,已成功安裝7-Zip軟件,2
ExitApp
}
}
; 非常感謝 RunWith() 函數作者 空
; 這個 RunWith() 函數解決了我的一大難題
; https://www.autoahk.com/archives/35533
; 強制自身進程以 管理員權限 或 普通權限 或 ANSI 或 U32 或 U64 版本運行。
; 例1: runwith("admin","u32") 強制自身以 u32 + 管理員權限 運行。
; 例2: runwith("","ansi") 強制自身以 ansi 版本運行（權限不變）。
; 例3: runwith("normal") 強制自身以 普通權限 運行（版本不變）。
RunWith(RunAsAdmin:="Default", ANSI_U32_U64:="Default")
{
; 格式化預期的模式
switch, RunAsAdmin
{
case "Normal","Standard","No","0": RunAsAdmin:=0
case "Admin","Yes","1": RunAsAdmin:=1
case "Default": RunAsAdmin:=A_IsAdmin
default: RunAsAdmin:=A_IsAdmin
}
switch, ANSI_U32_U64
{
case "A32","ANSI","A": ANSI_U32_U64:="AutoHotkeyA32.exe"
case "U32","X32","32": ANSI_U32_U64:="AutoHotkeyU32.exe"
case "U64","X64","64": ANSI_U32_U64:="AutoHotkeyU64.exe"
case "Default": ANSI_U32_U64:="AutoHotkey.exe"
default: ANSI_U32_U64:="AutoHotkey.exe"
}
; 獲取傳遞給 “.ahk” 的用戶參數（不是 /restart 之類傳遞給 “.exe” 的開關參數）
for k, v in A_Args
{
if (RunAsAdmin=1)
{
; 轉義所有的引號與轉義符號
v:=StrReplace(v, "\", "\\")
v:=StrReplace(v, """", "\""")
; 無論參數中是否有空格，都給參數兩邊加上引號
; Run 的內引號是 "
ScriptParameters .= (ScriptParameters="") ? """" v """" : A_Space """" v """"
}
else
{
; 轉義所有的引號與轉義符號
; 注意要轉義兩次 Run 和 RunAs.exe
v:=StrReplace(v, "\", "\\")
v:=StrReplace(v, """", "\""")
v:=StrReplace(v, "\", "\\")
v:=StrReplace(v, """", "\""")
; 無論參數中是否有空格，都給參數兩邊加上引號
; RunAs.exe 的內引號是 \"
ScriptParameters .= (ScriptParameters="") ? "\""" v "\""" : A_Space "\""" v "\"""
}
}
; 判斷當前 exe 是什么版本
if (!A_IsUnicode)
RunningEXE:="AutoHotkeyA32.exe"
else if (A_PtrSize=4)
RunningEXE:="AutoHotkeyU32.exe"
else if (A_PtrSize=8)
RunningEXE:="AutoHotkeyU64.exe"
; 運行模式與預期相同，則直接返回。 ANSI_U32_U64="AutoHotkey.exe" 代表不對 ahk 版本做要求。
if (A_IsAdmin=RunAsAdmin and (ANSI_U32_U64="AutoHotkey.exe" or ANSI_U32_U64=RunningEXE))
return
; 如果當前已經是使用 /restart 參數重啟的進程，則報錯避免反復重啟導致死循環。
else if (RegExMatch(DllCall("GetCommandLine", "str"), " /restart(?!\S)"))
{
預期權限:=(RunAsAdmin=1) ? "管理員權限" : "普通權限"
當前權限:=(A_IsAdmin=1) ? "管理員權限" : "普通權限"
ErrorMessage=
(LTrim
預期使用: %ANSI_U32_U64%
當前使用: %RunningEXE%
預期權限: %預期權限%
當前權限: %當前權限%
程序即將退出。
)
MsgBox 0x40030, 運行狀態與預期不一致, %ErrorMessage%
ExitApp
}
else
{
; 獲取 AutoHotkey.exe 的路徑
SplitPath, A_AhkPath, , Dir
if (RunAsAdmin=0)
{
; 強制普通權限運行
switch, A_IsCompiled
{
; %A_ScriptFullPath% 必須加引號，否則含空格的路徑會被截斷。%ScriptParameters% 必須不加引號，因為構造時已經加了。
; 工作目錄不用單獨指定，默認使用 A_WorkingDir 。
case, "1": Run, RunAs.exe /trustlevel:0x20000 "\"%A_ScriptFullPath%\" /restart %ScriptParameters%",, Hide
default: Run, RunAs.exe /trustlevel:0x20000 "\"%Dir%\%ANSI_U32_U64%\" /restart \"%A_ScriptFullPath%\" %ScriptParameters%",, Hide
}
}
else
{
; 強制管理員權限運行
switch, A_IsCompiled
{
; %A_ScriptFullPath% 必須加引號，否則含空格的路徑會被截斷。%ScriptParameters% 必須不加引號，因為構造時已經加了。
; 工作目錄不用單獨指定，默認使用 A_WorkingDir 。
case, "1": Run, *RunAs "%A_ScriptFullPath%" /restart %ScriptParameters%
default: Run, *RunAs "%Dir%\%ANSI_U32_U64%" /restart "%A_ScriptFullPath%" %ScriptParameters%
}
}
ExitApp
}
}
; -----2-----
#SingleInstance,Ignore
loop,5
{
DetectHiddenWindows,On
Sleep,5
IfWinExist,E-Mail-595076941@QQ.COM
ExitApp
}
Gui, Show, Hide,E-Mail-595076941@QQ.COM
#Persistent
; #NoTrayIcon
DetectHiddenWindows,On
SetTitleMatchMode,2
; 啟動7z安裝程序
SetTimer,SetupTimer,500
return
SetupTimer()
{
; 1、如果程序沒有運行則運行程序
Process,Exist,Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
if (%ErrorLevel%=0)
{
IfExist,%A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
{
Run,%A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
}
else
{
MsgBox,找不到文件 %A_ScriptDir%\Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe
return
}
}
IfWinNotExist,安裝向導 - Delphi 7 Lite Full Edition,正在你的計算機中安裝 Delphi 7 Lite Full Edition，請稍等...
{
ControlSend, TNewButton1,{Space}, 選擇安裝語言 ahk_class TSelectLanguageForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
ControlSend, Button1,{Space}, 安裝向導 ahk_class #32770 ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 本程序為Window
ControlSend, TNewButton1,!n, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
ControlSend, TNewButton1,!i, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp, 取消
}
IfWinExist,安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm,安裝向導已完成 Delphi 7 Lite Full Edition 的安裝
{
SetTimer,SetupTimer,Delete
ControlClick, TNewButton5, 安裝向導 - Delphi 7 Lite Full Edition ahk_class TWizardForm ahk_exe Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.tmp,安裝向導已完成 Delphi 7 Lite Full Edition 的安裝
MsgBox,,,已成功安裝Delphi7Lite編程軟件,2
ExitApp
}
}
; ----- End -----
*/
#SingleInstance, Ignore
#NoEnv
#Include MyFunction.ahk
SendMode Input
SetWorkingDir %A_ScriptDir%
; 每天創建篩選分類整理優化一下代碼
SetTimer,CleanCodeTimer,86400000
return
CleanCodeTimer()
{
; 調用思考函數子程序
Thinking()
; 調用搜索函數子程序
Searching()
; 調用修改函數子程序
Changing()
; 調用測試函數子程序
Testing()
}