Latest post of the previous page:
Так ведь Ваш пример с добавлением пользователей в AD показывает, что как раз есть такая нужда.
Потому что не имеет прямого отношения к обсуждаемой теме.
Latest post of the previous page:
Так ведь Ваш пример с добавлением пользователей в AD показывает, что как раз есть такая нужда.
Потому что не имеет прямого отношения к обсуждаемой теме.
Code: Select all
╔═════════════ Warning ══════════════╗
║ Macro key 'CtrlC' will be removed. ║
║ Sequence: ║
║ "Keys("1")" ║
║ Delete? ║
╟────────────────────────────────────╢
║ { Yes } [ Change ] [ No ] ║
╚════════════════════════════════════╝
Code: Select all
╔═════════════ Warning ═════════════╗
║ Macro key 'Alt5' will be removed. ║
║ Sequence: ║
║ "q" ║
║ Delete? ║
║ Yes No ║
╚═══════════════════════════════════╝
Не совсем. Там делаю так. Составляю список пользователей.
Плагины для 1.75 работают и в 3.0.
Как насчет
Code: Select all
Macro {
area='Editor', key='CtrlR', description='Repeat keys', flags = 'EnableOutput',
action=function()
local num, continue, key = 0, true ;
io.write('Repeat ') -- Repeat
while continue do
key = mf.waitkey(0,0)
local start, tmp = string.find(key, '%d')
if start == 1 then
num=num..key
io.write(key) -- key
else
continue = false
end
end
panel.GetUserScreen(); -- Clear screen
panel.SetUserScreen(); --
num = tonumber(num)
if num > 0 then
if eval(key,2)==-2 then
for i=1,num do Keys(key); end
else
for i=2,num do eval(key,2); end
end
end
end,
}
Спасибо!iva wrote: Вроде вот такой макрос повторяет.Нажимаем CtrlR число и клавишу.Code: Select all
Macro { area='Editor', key='CtrlR', description='Repeat keys', flags = 'EnableOutput', action=function() local num, continue, key = 0, true ; io.write('Repeat ') -- Repeat while continue do key = mf.waitkey(0,0) local start, tmp = string.find(key, '%d') if start == 1 then num=num..key io.write(key) -- key else continue = false end end panel.GetUserScreen(); -- Clear screen panel.SetUserScreen(); -- num = tonumber(num) if num > 0 then if eval(key,2)==-2 then for i=1,num do Keys(key); end else for i=2,num do eval(key,2); end end end end, }
Нарываетесь http://forum.farmanager.com/viewtopic.php?t=5207
Уже почитал и прикрутил. Чего кричать-то?
есть правила форума, их стоит соблюдать.alex86m6 wrote:Уже почитал и прикрутил. Чего кричать-то?
Диалог можно было сделать, но мне лень. По-началу у меня вообще всё было "молча". У макроса есть одна опасность: не надо исправлять число повторений при помощи Backspace, так как будет повторен сам Backspace."Странность" в запросе количества повторений.
Как раз с диалогом макрос получается примерно вдвое короче исходного
Code: Select all
Macro {
area='Editor'; key='CtrlR'; description='Repeat keys';
action=function()
local num = tonumber(far.InputBox())
if num and num>0 then
local key = mf.waitkey(0,0)
if eval(key,2)==-2 then
for i=1,num do Keys(key); end
else
for i=2,num do eval(key,2); end
end
end
end;
}
win.Uuid('EF2ACCC7-AD34-4523-8177-295EC05B3F02')
, поскольку это API плагинов, а не макросов.
Должно работать. Приведите пример макроса, на котором у вас это не работает.