Divider

Название Divider
Имя файла (*.txt) Divider.txt
Описание Устанавливает разделитель файловых панелей в заданное положение
Автор Вахмурка
Параметр "1" для положения 20/80, "2" для 30/70, ... , "7" для 80/20
Вызываемые плагины win, childwin
Версия 1.0
Дата обновления 03.10.2005

local Where = arg(1)
local i
local Hand = win.handle("c=TTOTAL_CMD")

flag set 1

for(i = 1; 1; i = i + 1)
	hh = childwin.handle(Hand, i)
	if(hh != "" && win.width(hh) == 3) do
		flag clear 1
		break
	endif
endfor

if(pproflag(1))
	quit

local HCenter = (win.left(hh) + win.right(hh))/2
local VCenter = (win.top(hh) + win.bottom(hh))/2
local expr = "ab " ++ HCenter ++ " " ++ VCenter
win.mouse(expr)
wait.for(10)
mouse rightdown
wait.for(10)
mouse rightup

for(i = 1; i <= Where; i = i + 1)
	*keys {down}
endfor

*keys {enter}

Комментарии:

Единственный скрипт, который я писал, будучи убежденным в его бесполезности. Кто бывает на русском форуме, возможно, знает историю его появления. Но, раз уж он написан, почему бы не выложить? Вдруг кому-то понадобится...

Скрипт работает только если панели расположены вертикально - по умолчанию.


На главную Все о Total Commander PowerPro PowerPro & Total Commander