aardio + AutoHotkey 混合編程
- 2022 年 9 月 25 日
- 筆記
本文主要介紹 aardio + AutoHotkey 混合編程。
在 aardio 中可以調用很多程式語言，例如 C語言、C++、C#、Java、Python、R、Javascript、Node.Js、Fortran、VB、Flash ActionScript、PHP、VBScript、PowerShell、NewLISP、AutoLISP、Delphi、FreeBASIC、Ruby、Rust、Julia、Nim、Go 語言、批處理 ...... 請參考《 aardio 調用第三方程式語言示例》。
1、雙擊打開：aardio 工具 / 擴展庫
2、擴展庫名字輸入 ahk，搜索結果中雙擊 ahk 擴展庫 —— 打開最新範例。
aardio 提供了 ahk 擴展庫可用於嵌入 AutoHotkey 並與 AutoHotkey 交互調用，支援 AutoHotkey v1 以及 AutoHotkey v2 版本。
▶ aardio 調用 AutoHotkey v1
aardio 可以直接調用 AutoHotkey 函數，AutoHotkey 也可以調用 aardio 函數，非常簡單：
import win.ui; /*DSG{{*/ var winform = win.form(text="嵌入 AutoHotkey v1 演示") winform.add( edit={cls="edit";left=17;top=18;right=741;bottom=445;edge=1;multiline=1;z=1} ) /*}}*/ //導入 AutoHotkey v1 擴展庫 import ahk; /* 導出允許AutoHotkey 調用的 aardio 函數（函數名必須以 on 開頭）。 */ ahk.onTest = function(param){ winform.edit.print( "winform.onTest被ahk調用",param ); winform.show(); } //運行ahk程式碼 ahk.run( ` #Persistent ;保持 AHK 執行緒不退出 #NoTrayIcon ;不顯示托盤圖標 #include <aardio> ;啟動 AHK 程式碼中必須加入這句才能與 aardio 交互 ; 定義函數與 aardio 有點像，aardio 一般會寫為 GetPoint = function(hwnd){ return value;} GetPoint(){ ; 直接調用aardio函數，支援任意類型、不定個數的調用參數 aardio.onTest({ x : 2, y : 3 }) return { x : 2, y : 3 } }`); /* 直接調用ahk里定義的全局函數， 參數和返回值自動支援各種數據類型，就像調用普通aardio函數。 是不是很神奇？！ */ var point = ahk.GetPoint(); winform.edit.print("調用ahk函數的返回值：",point); win.loopMessage();
請注意 aardio 中文件路徑以斜桿（或反斜桿）開始表示應用程式根目錄，應用程式根目錄在開發時指工程目錄或工程外獨立啟動的文件所在目錄，發布後指 EXE 所在目錄。應用程式根目錄已設為 AHK 工作目錄 %A_WorkingDir% 。
導出 aardio 函數給 ahk 時也可以返回一個非同步執行的函數對象，調用虛擬桌面示例：
import ahk; import dotNet.desktop; import win.ui; /*DSG{{*/ var winform = win.form(text="虛擬桌面切換";right=599;bottom=399) winform.add( edit={cls="edit";left=17;top=18;right=565;bottom=374;edge=1;multiline=1;z=1} ) /*}}*/ //導出 AutoHotkey 函數 ahk.onSwitch = function(index){ winform.edit.print("已切換桌面到：",index); //虛擬桌面在鍵盤鉤子中需要通過返回非同步函數非同步調用。 return function() { dotNet.desktop.get(index).MakeVisible() } } //運行 AutoHotkey 程式碼註冊熱鍵 ahk.run( ` #Persistent #NoTrayIcon #include <aardio> ^j:: aardio.onSwitch(1) ^k:: aardio.onSwitch(2) `); winform.show(); win.loopMessage();
如果在 aardio 中執行以下程式碼：
ahk.import("path/libName");
則由 aardio 導入
\AutoHotkey\Lib\path\libName.ahk
可以在 aardio 工程中添加上面的 ahk 文件 到內嵌資源目錄，這樣該 ahk 文件會被編譯到 exe 資源內，運行時自動轉存為以下文件：
%A_MyDocuments%\AutoHotkey\Lib\path\libName.ahk
在 AHK 中可以使用以下程式碼引用該模組：
#include <path/libName>
在 aardio 中可使用 ahk.setGlobal() 函數修改 AHK 全局變數：
//直接修改 AHK 全局變數的值 ahk.setGlobal("gVar","測試一下")
在 aardio 中執行 AHK 程式碼時還可以支援 aardio 模板語法，也就是在 AHK 程式碼中可以直接寫 aardio 程式碼，只要將 aardio 程式碼包含在 <? ?> 標記中就可以了（類似 PHP 模板語法），例如：
//運行 AHK 程式碼 ahk.run( ` #Persistent ; #NoTrayIcon ; #include <aardio> ; global gVar := "<?="允許嵌入 aardio 程式碼"?>" ; `); //直接修改 AHK 全局變數的值 ahk.setGlobal("gVar","測試一下")
關於 aardio 模板語法請參考 aardio 文檔。
▶ aardio 調用 AutoHotkey v2
在 aardio 使用 ahk.thread 擴展庫可以調用 AutoHotkey v2，ahk.thread 不再需要在 AHK 啟動程式碼中包含 #include <aardio>，其他用法與調用 ahk 擴展庫類似。下面看例子：
import win.ui; /*DSG{{*/ var winform = win.form(text="嵌入 AutoHotkey v2 演示") winform.add( edit={cls="edit";left=8;top=10;right=749;bottom=452;edge=1;multiline=1;z=1} ) /*}}*/ winform.show(); import ahk.thread; var ahk2 = ahk.thread(); //直接定義允許 AHK 調用的 aardio 函數（函數名以on開頭） ahk2.onTest = function(param){ winform.edit.print( "winform.onTest被ahk調用",param ); return 123 } //運行 AHK 程式碼 ahk2.run( ` #NoTrayIcon ;不顯示托盤圖標 Persistent( true) ;保持ahk執行緒不退出 ; 定義函數與 aardio 有點像，aardio 一般會寫為 GetPoint = function(hwnd){ return value;} GetPoint(){ ; 直接調用aardio函數，支援任意類型、不定個數的調用參數 aardio.onTest({ x : 2, y : 3 }) return { x : 2, y : 3 } }`); /* 直接調用ahk里定義的全局函數， 參數和返回值自動支援各種數據類型，就像調用普通aardio函數。 是不是很神奇？！ */ var point = ahk2.GetPoint(); winform.edit.print("調用ahk函數的返回值：",point); win.loopMessage();
要注意 AHK 中的變數默認是局部變數，定義全局變數要用 global 語句，aardio 則是默認全局變數，定義局部變數要用 var 語句。
▶ 進階
有了前面的基礎，我們再將範例稍微整複雜一點，例如調用 AHK v1 ：
import win.ui; /*DSG{{*/ var winform = win.form(text="嵌入 AutoHotkey v1") winform.add( edit={cls="edit";left=17;top=18;right=734;bottom=444;edge=1;multiline=1;z=1} ) /*}}*/ import ahk; ahk.onTest = function(param){ winform.edit.print( "winform.onTest被ahk調用",param ); winform.show(); } ahk.run( ` #Persistent #NoTrayIcon #include <aardio> GetPoint(){ ; 命令式語法 = 號後面是字元串，變數要放到百分號里 POINT_TYPE = ( UInt x; UInt y; ) ; 首尾兩個括弧都必須獨佔一行，用於包含多行字元串 ; 新語法 := 後面是表達式,和其他程式語言類似字元串放引號里,變數不用放百分號里 point := Struct( POINT_TYPE ) ; ; 取結構體指針，aardio 里調用 API 時結構體總是自動轉為指針，不需要寫這些程式碼 ptr := point[] ; DllCall("user32.dll\GetCursorPos", "Ptr", ptr) GetCursorPos(ptr) ; ; 直接調用aardio函數，支援任意類型、不定個數的調用參數 aardio.onTest({ x : point.x, y : point.y }) ; 命令式語法, 百分號加一個空格表示後面是表達式 MsgBox, % "x:" point.x ",y:" point.y return { x : point.x, y : point.y } }`); /* 直接調用ahk里定義的全局函數 */ var point = ahk.GetPoint(); winform.edit.print("調用ahk函數的返回值：",point); win.loopMessage();
以上主要是演示 aardio 與 AHK 交互，其實 aardio 直接調用 ::User32.GetCursorPos() 程式碼更簡單，示例：
// 當然上面的程式碼用 aardio 直接寫會更簡單，例如： var point = {int x;int y}; //不用聲明直接調用 API，不用寫參數類型這些 ::User32.GetCursorPos(point);
aardio 可以免聲明直接調用 WinAPI ，不需要指定參數類型。
下面再來個例子，使用 aardio 暫停、繼續 AHK 腳本：
import fonts.fontAwesome; import win.ui; /*DSG{{*/ var winform = win.form(text="嵌入autohotkey演示";right=757;bottom=467) winform.add( button={cls="plus";text="暫停AHK";left=19;top=11;right=109;bottom=41;bgcolor=-6960024;font=LOGFONT(name='FontAwesome';charset=0);z=2}; edit={cls="edit";left=17;top=56;right=729;bottom=443;edge=1;multiline=1;z=1} ) /*}}*/ import ahk; var handle = ahk.run( ` #Persistent ;保持ahk執行緒不退出 #NoTrayIcon ;不顯示托盤圖標 #include <aardio> ;啟動ahk程式碼中必須加入這句才能與aardio交互 ::hj::run無亂碼 `); winform.button.onMouseClick = function(){ if(winform.button.text=="暫停AHK"){ thread.suspend(handle) winform.button.text = "繼續AHK" } else { thread.resume(handle) winform.button.text = "暫停AHK" } } winform.button.skin({ color={ active=0xFFFFFFFF; default=0xFF000000; hover=0xFFFFFFFF }; }); winform.show(); win.loopMessage();
