AutoHotkey: Springe zur nächsten Dateierweiterung

Aus TCWikide
Wechseln zu: Navigation, Suche

Druck von Strg+Alt+Runter bzw. Strg+Alt+Rauf bewegt den Cursor zum nächsten Eintrag mit einer unterschiedlichen Dateierweiterung.


#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




->Zurück zu AutoHotkey