快速鍵控制AmiBroker一次移動一根bar

zaqimon

AmiBroker可以透過左右鍵移動selection bar的方式一次移動一根bar
也可以透過滑鼠操作scrollbar的方式一次移動一根bar
但我一直沒找到如何用快速鍵方式讓AmiBroker一次移動一根bar

下面是透過AutoIt HotKeySet的方式自己定義快速鍵一次移動一根bar

1. Func AB_Scroll($left = False) ; default scroll right
   
2.         $hwnd = WinActive("[CLASS:AmiBrokerMainFrameClass]") ; if AcmiBroker active
   
3.         If $hwnd = 0 Then Return ; return if not AmiBroker
   
4.         $hwnd = ControlGetHandle($hwnd, "", "[CLASS:MDIClient]") ; MDIClient child
   
5.         $hwnd = _WinAPI_GetWindow($hwnd, $GW_CHILD) ; 1st child
   
6.         $hwnd = _WinAPI_GetWindow($hwnd, $GW_CHILD) ; 1st child
   
7.         $hwnd_sb = ControlGetHandle($hwnd, "", "[CLASS:ScrollBar]") ; 1st ScrollBar child
   
8.         If $left Then
   
9.                 _SendMessage($hwnd, $WM_HSCROLL, $SB_LINELEFT, $hwnd_sb)
   
10.         Else
    
11.                 _SendMessage($hwnd, $WM_HSCROLL, $SB_LINERIGHT, $hwnd_sb)
    
12.         EndIf
    
13. EndFunc

複製代碼

kingwang

感謝版主的分享，謝謝