Single Post - Утилита для работы с плагинами WDX из командной строки

Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB

Rules

Search

FAQ

Memberlist

Usergroups

Profile

Single Post

Topic: Утилита для работы с плагинами WDX из командной строки

Author

Message

Orion9

Posted: Mon Mar 25, 2024 01:12 Post subject:

jentoso
Спасибо. Надо попробовать.
Сомнительно, правда, что многие пользуются таким продвинутым плугом. Просто зайти на сайт и проверить, что там нового, как-то удобнее. Я имею в виду wincmd.ru. Хотелось бы, конечно, чтобы он всегда был в актуальном состоянии относительно всего, что связано с Тоталом, но, видимо, так не получится.

Loopback wrote:

Вот именно этого я и опасался... Smile

Я сам этого опасался! Laughing

Но ваш труд не будет напрасен. Вы только посмотрите, какая красота получается!

autorun.cfg

Code:

ControlSetMouseAction /L /K:C 3 ShowConsoleHint

Func ShowConsoleHint
Local f, p
f = StrPart(ItemAtCursor('text'), auTAB, 1)
p = SendMessage(RequestInfo(ItemAtCursor('panel') + 8), 13, 500, "" , 2)
p = StrLeft(p, StrPos(p, "\", -1))
f = p & f
If Not FileExist(f) Then
MsgBox("Файл не существует " & f)
Return
Endif
ShellExec /SW_HIDE /WAIT:5000 "%COMMANDER_PATH%\Plugins\uwdx\uwdx.bat" """%f%"""
EndFunc

uwdx.bat

Code:

CHCP 866

icacls %1 > "%TEMP%\uwdx1"
"%~dp0uwdx.exe" /C:866 /E /I /X:Obj_RealPath /X:Obj_RealSize NTLinks.wdx %1 >> "%TEMP%\uwdx1"
"%~dp0uwdx.exe" /C:866 /E /I /X:8 /X:9 NTFSFileStreams.wdx %1 >> "%TEMP%\uwdx1"
"%~dp0uwdx.exe" /C:866 /E /I FileX.wdx %1 >> "%TEMP%\uwdx1"

rem "%~dp0uwdx.exe" /E /I ShellDetails.wdx %1 >> "%TEMP%\uwdx1"

start "" "%COMMANDER_PATH%\Scripts\ahk\AutoHotkey32.exe" "%COMMANDER_PATH%\Scripts\ahk\uwdx.ahk" "%TEMP%\uwdx1"

uwdx.ahk

Code:

#SingleInstance Force

#Include ToolTipOptions.ahk

ToolTipOptions.Init()
ToolTipOptions.SetFont("s10", "Consolas")
ToolTipOptions.SetMargins(12, 12, 12, 12)
ToolTipOptions.SetTitle("Console Hint" , 1)
ToolTipOptions.SetColors("Black", "White")

ToolTip(FileRead(A_Args[1], "CP866"))

KeyWait "LButton", "D"

ToolTipOptions.ahk можно скачать отсюда:
https://www.autohotkey.com/boards/viewtopic.php?t=113308
И положить рядом с uwdx.ahk

Учитывая картину, нужно будет еще пару ключей добавить! Shocked

Тут надо чуток подумать.

P.S.Просто я когда прочитал справу по ключу, ненароком подумал, что вы его только к режиму вывода всех полей, включая с пустыми значениями, добавили, а не в довес к /E. Но как быстро выяснилось, все норм.