LonerD
|
Posted: Mon Apr 20, 2020 15:18 Post subject: |
|
|
Делал себе такой вариант на AutoHotkey
Code: | ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Total Commander DreamLair ;
; Script: Goto path from shortcut ;
; Script version: 1.3 (2020.04.21) ;
; Script author: LonerD ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Parameter: ;
; 1) %P%N (required) ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
#NoEnv
#NoTrayIcon
#SingleInstance force
if not ( WinExist("ahk_class TTOTAL_CMD") || WinActive("ahk_class TTOTAL_CMD") )
ExitApp
WinGet, hw_TTOTAL_CMD, ID, A
LnkPath = %1%
if !FileExist(LnkPath)
ExitApp
SplitPath, LnkPath ,,, LnkExt
if ( LnkExt <> "lnk" )
ExitApp
EnvGet, commander_exe, commander_exe
FileGetShortcut, % LnkPath, LnkPathGo
if FileExist(LnkPathGo)
RunWait, % commander_exe " /O /S /A /L=" """" LnkPathGo """"
else
ExitApp
if InStr(FileExist(LnkPathGo), "D")
PostMessage, 1075, 2002,,, % "ahk_id " hw_TTOTAL_CMD
ExitApp |
_________________ Win11 x64 Eng | TC DreamLair eternal pre-α
Last edited by LonerD on Tue Apr 21, 2020 20:49; edited 1 time in total |
|