PP Script: Local Bars for TC

[Gregory]

Данный скрипт представляет собой расширение возможностей стандартного Button Bar командера. Вешается на кнопку в ButtonBar. Действует таким образом - ищет в активном каталоге и в родительских файл _local.bar, если находит - показывает с помощью TCMenu (формат _local.bar такой же как и у файла Button Bar).

Код: выделить все

local path barpath

path=remove(win.childtextbyindex("c=TTOTAL_CMD",12),-1)

for (length(path)>1)
  barpath=path++"\_local.bar"
  if (validpath(barpath))  do
     barpath=barpath++" -$"
     do("C:\totalcmd\Utils\TCMenu\TCmenu.exe",barpath)
     break
  else
     path=file.folder(path)
  endif
endfor

[Reuben]

Ага, и повесить это еще на F2 <!--emo&:)--><!--endemo-->
Кстати, а почему не просто через какую-нибудь РР-менюшку ?

[Gregory]

<!--QuoteBegin--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>QUOTE </td></tr><tr><td id='QUOTE'><!--QuoteEBegin-->а почему не просто через какую-нибудь РР-менюшку ? <!--QuoteEnd--></td></tr></table><span class='postcolor'><!--QuoteEEnd-->
Например?

[Reuben]

Я думал для этого просто класть в папки файлики в формате filemenu, но как ты делаешь действительно удобнее

[VadiMGP]

Действительно, интересная мысль!

И еще... Меня тут спрашивали недавно, так я подумал, может кому-нибудь еще пригодится... Tcmenu была написана в предположении, что ее запускает только ТС из тулбара. Поэтому если ее запускает кто-то другой, то внутренние команды ТС не работают. Происходит это потому, что Tcmenu ожидает, что окно ТС находится в той точки, гда кликнули мышой. Чтобы внутренние команды работали в чужом окне, надо, чтобы это чужое окно имело ТС в качестве папы. Только не перепутайте - именно ТС в качестве папы, а не оно само в качестве ребенка. Это разные вещи.

[Reuben]

Так что, скрипт, запущенный из панели TC, по идее подходит -- мышка же над окном TC ?

[VadiMGP]

Да, конечно. Я писал о другом. Меня недавно спрашивали почему не работает TCmenu, если ее запустить по кнопке из другой программы, не из ТС. Ну я и объяснил - вдруг кому-нибудь еще пригодится

[Gregory]

2VadiMGP
А как насчет того, чтобы адаптировать TCMenu для запуска по хоткею?

[VadiMGP]

Не понял, торможу, что-то. А поподробнее можно, что именно адаптировать?

[Gregory]

Если TCMenu запускать по хоткею, меню имеет тенденцию цепляться к различным окнам коммандера, причем куда оно прицепится зависит от положения мышки. Может просто ввести параметр, при котором меню будет показываться возле кусора мышки?

[VadiMGP]

Можно, в общем-то. Хотя всех проблем это не решит, если мыша не над окном ТС.

[Gregory]

Ну это проблемы не смертельные, во всяком случае при запуске из скрипта PowerPro. Но зачем что-то предолагать насчет окна TC, не легче ли его просто найти?

[VadiMGP]

A если у тебя открыто 3 ТС? Которому из них посылать команду, например, на уничтожение файла под курсором? <!--emo&:D--><!--endemo--> Первому попавшемуся? <!--emo&;)--><!--endemo-->

[Gregory]

Возможно я не прав, но после экспериментов с 3 окнами TC, у меня сложилось впечатление, что если окно TC активно, то FindWindow находит именно его (так что можно посылать первому попавшемуся <!--emo&:)--><!--endemo--> )

[VadiMGP]

Нет, это не так. Зависит от версии виндоузы. Зависит от того занят ли сейчас ТС чем-то (например поиском) или нет. Кроме того, а что будет, если ни один не активен? <!--emo&;)--><!--endemo--> Если интересно, можешь поразвлекаться с запуском "totalcmd /o" через Start/Run когда все окна ТС свернуты. <!--emo&:D--><!--endemo-->