#Requires AutoHotkey v2

#SingleInstance Force

#HotIf WinActive("peviewer ahk_class TLister") and   
       InStr(ControlGetClassNN(ControlGetFocus("A")),"TListView") > 0

~LButton::
{
    If (A_ThisHotkey = A_PriorHotkey and A_TimeSincePriorHotkey < 200)
        FileInfo
}

FileInfo()
{

   if StrLen(EnvGet("COMMANDER_EXE")) = 0
   {
      MsgBox "Переменная %COMMANDER_EXE% не определена",, "Iconx"
      Return
   }
   A_Clipboard := ""
   
   Send "^c"
   Sleep(100)
   
   if !ClipWait(1)
   {
       MsgBox "Текст не скопирован в буфер"
       return
   }
   
   if InStr(A_Clipboard, '\') = 0
      Return
     
   f:=name:=''
   Loop Parse, A_Clipboard, ","
      {
        if A_Index = 1
           name:= Trim(A_LoopField)
        if (A_Index = 3)
           f:=Trim(A_LoopField)
      }
      f:= f . name
      f:=StrReplace(f, '`r`n','')
      if not InStr(FileExist(f),'D')
         Run EnvGet("COMMANDER_EXE") ' /S=L:Ppeviewer ' f
      else
         msgbox f 
}

DllCanUnloadNow
DllGetClassObject
DllRegisterServer
DllUnregisterServer