[AHK]获取下单窗口的控件列表

野性酷女 2022-10-08 05:39 426阅读 0赞

如果知道下单界面控件的 ahk\_class 或 ahk\_id（即hwnd）就可以用 controlsend来自动下单。

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70][]  
比如证券代码输入框的hwnd是ctrHwnd，则发送 股票代码600050到代码窗口例子如下：

controlsend,,600050,ahk_id %ctrHwnd%

以下这两个截图，是通达信单独下单程序（Tc.exe）中的控件信息 ，

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 1][]

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 2][]

可以用星雨朝霞的ahkinfo1.3.5脚本来手动查看相应控件信息，如下操作：

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 3][]

![20210620092050879.png][]

参考星雨朝霞的ahkinfo1.3.5脚本改造如下，以下脚本各位使用时请调整第二行配置

Gui,+Resize
    target:="ahk_exe Tc.exe"
    Gui, Add, ListView, Checked h600 w800,  类别名|ID|句柄|文本  ; 创建 ListView.
    WinGet,CtrList,ControlList,%target%
    	LV_Delete()
    	Loop, Parse,CtrList,`n
    	{
    		ControlGet,CtrlHwnd,Hwnd,,%A_LoopField%,%target%
    		CtrlID:= DllCall("GetDlgCtrlID", uint, CtrlHwnd)
    		if (CtrlID<=0 )
    			CtrlID=
    		ControlGetText,CtrlText,%A_LoopField%,%target%
    		ControlGet,Visible,Visible,,%A_LoopField%,%target%
    		if (Visible=1)
    		{
    			Visible=Check
    		}
    		else if (Visible=0)
    		{
    			Visible=-Check
    			;~ continue
    		}
    		LV_Add(Visible,A_LoopField,CtrlID,CtrlHwnd,CtrlText)
    		LV_ModifyCol(1,"","类别名[列表](" A_Index ")")
    	}
    ;~ LV_ModifyCol("Hdr")  ; 自动调整列宽.
    LV_ModifyCol()  ; 根据内容自动调整每列的大小.
    Gui Show
    return
    
    GuiClose:  ; 当用户关闭 ListView 所在 GUI 窗口时退出脚本.
    ExitApp

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70]: /images/20221005/8b60ebcd0c614c1dadf9c94226b42d84.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 1]: /images/20221005/34d176870dd7433f9a145c50478a9ba0.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 2]: /images/20221005/b20008f6fb614fdd9f74b106ababe030.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2xpdXl1a3Vhbg_size_16_color_FFFFFF_t_70 3]: /images/20221005/009af9014d1144328c075e1ad9edd583.png
[20210620092050879.png]: /images/20221005/8bd60359ab0a4b4ea7ae0b4aa9458d4b.png