Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Автоматическое нажатие F3-F4 
Author Message
mf-zl



PostPosted: Fri Aug 02, 2013 15:05    Post subject: Reply with quote

TotalMouseEX v0.1a by zL
AutoHotkey_L v1.1.1.00 Unicode

Зажатие левой кнопки - F3
Клик средней - F4

Code:
#SingleInstance force

#If WinActive("ahk_class TTOTAL_CMD") and MouseUnder("TMyListBox[12]")

~LButton::
  If LPress {
    LPress += 1
    Return
  } LPress = 1
  SetTimer, LPress, On
Return

MButton::
  Click
  Send, {F4}
Return

LPress:
  SetTimer, LPress, Off
  If (LPress = 1)
   { KeyWait, LButton, T0.4
    If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD"))
    { Click
      Send, {F3}
    }
   } LPress = 0
Return

MouseUnder(Controls) {
  MouseGetPos,,,, Control
  If RegExMatch(Control, Controls)
    Return, True
}
View user's profile Send private message Visit poster's website


Powered by phpBB © 2001, 2005 phpBB Group