AutoHotkey：在FireFox裡用鍵盤瀏覽網頁

2008/03/27 |

| 點擊數: 1 / 7202

由於先前這篇用AutoHotkey改造ThinkPad X61按鍵提出了不使用滑鼠而只用鍵盤來瀏覽FireFox網頁的幾個作法，本篇除了再把指令再做調整修正外，再加上一個配合Super DragAndGo附加元件的按鍵，只要在超連結上按個X鍵，就能將該連結開啟在新分頁。

首先要修改的是增加一個瀏覽按鍵的切換鍵，按第一下讓瀏覽鍵生效，當要在網頁上輸入文字時再按第二次以關閉其功能，如此才能正常輸入，我使用的是〔Z〕鍵：

;定義一個共用變數
useBrowseKey = 1
; 切換瀏覽鍵
toggleFirefoxKeys() {
  global useBrowseKey    ;;用global宣告要使用共用變數useBrowseK
  if (useBrowseKey = 1)
    useBrowseKey = 0
  else
    useBrowseKey = 1
return
}

; 按〔Z〕切換useBrowseKeys的值
~z::
  toggleFirefoxKeys()
  return

; 修改先前寫好的函數，加入useBrowseKey的判斷
firefox(key) {
  WinGetTitle, sTitle, A   ; 取得作用中視窗的標題
  sProgram := getProgram(sTitle)
  ;MsgBox %sProgram% - %key
  if (sProgram = "FIREFOX") {
    global useBrowseKey
    ;;MouseGetPos, x, y, id, control
    if (useBrowseKey = 1) {
      Send %key%
    }
  }
  return
}

接著，再加上用〔X〕鍵執行Super DragAndGo的操作，也就是按下左鈕不放再往外拖拉：

~x::
  WinGetTitle, sTitle, A   ; 取得作用中視窗的標題
  sProgram := getProgram(sTitle)
  if (sProgram = "FIREFOX") {
    if (useBrowseKey = 1) {
      MouseGetPos, x, y, id, control
      Click down
      MouseMove, x, y-20
      Click up
    }
  }
  return

目前提供的按鍵彙總如下：

按鍵	功能說明
b	下一頁；〔PgDn〕在鍵盤的右上角很不好按，因此修改成〔b〕鍵
h	上一頁，把〔h〕設成〔PgUp〕
v	下一列，把〔v〕設成〔Down〕
g	上一列，把〔g〕設成〔Up〕
,	縮小頁面文字；用逗點的原因是小於也是這個按鍵，較好聯想
.	放大頁面文字；用逗點的原因是大於也是這個按鍵，較好聯想
x	Super DragAndGo，將游標位置的超連結開啟在新分頁
z	切換上述按鍵是否生效