AutoHotkey: Jump To The Next File Extension

Pressing Ctrl+Alt+Down resp. Ctrl+Alt+Up moves the cursur to the next entry with a different file extension.

#IfWinActive, ahk_class TTOTAL_CMD
^!Down::
Direction := "{Down}"
Gosub, ExtensionCheck
Return

^!Up::
Direction := "{Up}"
Gosub, ExtensionCheck
Return

ExtensionCheck:
Critical
Loop
{
  SendMessage, 1075, 1002
  ControlGetText, NewFileName, TInEdit.UnicodeClass1
  SendInput, {ESC}{ESC}
  NewFileNameDotPosition := InStr(NewFileName, ".", 0, 0)
  If (NewFileNameDotPosition)
    StringTrimLeft, NewExtension, NewFileName, NewFileNameDotPosition
  Else
    NewExtension := ""
  If (OldFileName = NewFileName OR OldExtension != NewExtension) AND (A_Index > 1)
    Break
  SendInput, %Direction%
  OldExtension := NewExtension
  OldFileName := NewFileName
}
Critical, Off
Return

---

Back to AutoHotkey