Как использовать в макросе Поиск Файлов (Alt-F7)?

Здесь обсуждается всё, что касается макросов.
Maximus5
Posts: 3292
Joined: Sun 11 Nov, 2007 02:03
Been thanked: 4 times
Contact:

Re: Помогите cделать макрос

Post by Maximus5 »

Latest post of the previous page:

не проверял, но можно вставить что-то вроде
$While (Dialog && (substr(Title,0,10)=="Find file:")) $End

wakh
Posts: 126
Joined: Wed 27 Apr, 2005 09:16
Location: Перогиреево
Has thanked: 6 times
Contact:

Re: Помогите cделать макрос

Post by wakh »

не пашет :(
Занимаюсь роликами и SEO, обращайтесь :)

User avatar
Skirda
Posts: 3475
Joined: Wed 16 Mar, 2005 11:01
Been thanked: 4 times

Re: Помогите cделать макрос

Post by Skirda »

кто бы сомневался :-(
о "себе" немного расскажи, может тогда пахать то и будет.
We are the Borg. You will be assimilated.
So Say We All!

wakh
Posts: 126
Joined: Wed 27 Apr, 2005 09:16
Location: Перогиреево
Has thanked: 6 times
Contact:

Re: Помогите cделать макрос

Post by wakh »

WinXP Pro SP3 x86
Far 1.71 alpha 4 b 2449
ка то так :)
Занимаюсь роликами и SEO, обращайтесь :)

User avatar
SUSim
Posts: 1543
Joined: Thu 18 Feb, 2010 17:32
Has thanked: 5 times
Been thanked: 10 times

Re: Помогите cделать макрос

Post by SUSim »

Сведения о себе тут особо не помогут, нетривиальная хотелка! Что для 1.71(почему не 1.75), что для 2.0 :(

Если очень-очень надо, то попробую сделать для FAR 2.0, я бы написал и чисто из академического интереса, но это займет много времени и почти напрасно... Такой макрос будет очень не универсален, и самое главное: затраты на написание макроса или плагина будут намного больше чем 1000 раз понажимать предлагаемую последовательность кнопочек вручную (её кстати можно сократить).
SimSU ··· ·· -- ··· ··-

Maximus5
Posts: 3292
Joined: Sun 11 Nov, 2007 02:03
Been thanked: 4 times
Contact:

Re: Помогите cделать макрос

Post by Maximus5 »


Code: Select all

[ ] Disable screen output

User avatar
DrKnS
Posts: 5620
Joined: Thu 04 Aug, 2005 06:44
Location: Kyiv
Has thanked: 9 times
Been thanked: 302 times

Re: Помогите cделать макрос

Post by DrKnS »

Боян же.

User avatar
SUSim
Posts: 1543
Joined: Thu 18 Feb, 2010 17:32
Has thanked: 5 times
Been thanked: 10 times

Re: Помогите cделать макрос

Post by SUSim »

DrKnS wrote:Боян же.
Почти, только у Maximus5 не зависит от языка.
Maximus5
Еще надо строку поиска текста почистить, и выставить область поиска, и обработать "доступ запрещен", и...
Не очень понятна конструкция "mmode(1,2) F11 Esc mmode(1,2)"
SimSU ··· ·· -- ··· ··-

User avatar
John Doe
Бюрократ
Posts: 12829
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 38 times
Been thanked: 290 times

Re: Макрос на поиск файлов

Post by John Doe »

А не проще ли tmp:<dir *.jpg /b /s ?

wakh
Posts: 126
Joined: Wed 27 Apr, 2005 09:16
Location: Перогиреево
Has thanked: 6 times
Contact:

Re: Макрос на поиск файлов

Post by wakh »

Всем спасибо за участие, понравился последний способ с темп панелью (а я ведь раньше никогда ею не пользовался, а штука удобная), потому остановился на таком варианте:

Maximus5 wrote:...
Поражён проделанной работой, не ожидал что получится столь длинный код, искренне считал что макрос будет пустяковый (как и вышло с темп.панелью), респект!
Занимаюсь роликами и SEO, обращайтесь :)

User avatar
John Doe
Бюрократ
Posts: 12829
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 38 times
Been thanked: 290 times

Re: Макрос на поиск файлов

Post by John Doe »

Наверно стоит для таких случаев завести что-нибудь типа макросвойства Idle.

wakh
Posts: 126
Joined: Wed 27 Apr, 2005 09:16
Location: Перогиреево
Has thanked: 6 times
Contact:

Re: Макрос на поиск файлов

Post by wakh »

Честно говоря, я ожидал, что макросом можно считать статус поиска, как и статус других ФАРовых операций.
и/или как в джаваскрипте воспользоваться функцией onLoad()
Занимаюсь роликами и SEO, обращайтесь :)

User avatar
John Doe
Бюрократ
Posts: 12829
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 38 times
Been thanked: 290 times

Re: Как использовать в макросе Поиск Файлов (Alt-F7)?

Post by John Doe »

  1. Macro {
  2.   description="Branch"; flags="EnableOutput";
  3.   area="Shell"; key="AltB";
  4.   uid="E567C945-6F38-4517-BCD2-DD2C58EC3618";
  5.   action=function()
  6.     Keys"AltF7"
  7.     if not Area.Dialog then return end
  8.     Keys"* Enter"
  9.     local lastitem,STOP_BUTTON
  10.     far.Timer(50,function(timer)
  11.       if not Area.Dialog then
  12.         timer:Close()
  13.       elseif not STOP_BUTTON then
  14.         lastitem = Dlg.ItemCount
  15.         STOP_BUTTON = Dlg.GetValue(lastitem)
  16.       elseif Dlg.GetValue(lastitem)~=STOP_BUTTON then
  17.         timer:Close()
  18.         Dlg.SetFocus(lastitem-1)
  19.         mf.postmacro(Keys,"Enter")
  20.       end
  21.     end)
  22.   end;
  23. }
Update: http://forum.farmanager.com/viewtopic.p ... 53#p121453

maximav
Posts: 62
Joined: Sat 23 Mar, 2013 14:06

Как использовать в макросе Поиск Файлов (Alt-F7)?

Post by maximav »

DrKnS wrote: Для русского интерфейса:
macro:post AltF7 tab $text "qwerty" Enter $while(Dlg.GetValue(10,0)!="[ Отм&ена ]") Shift $end AltK
А почему не получается/работает вставить macro:post в меню F2? Кстати, смотрю Far2-энциклопедию на dlg.getvalue и никак не пойму откуда здесь 10 (исправленное на 11) и почему работает. Где в описании про длину кнопки?

maximav
Posts: 62
Joined: Sat 23 Mar, 2013 14:06

Как использовать в макросе Поиск Файлов (Alt-F7)?

Post by maximav »

Пардон, про длину кнопки вопрос снимается, но откуда знать, что порядковый номер "отменить" есть 11? Отдельно узнали и вбили в код?

Smitis
Posts: 1623
Joined: Fri 18 Mar, 2005 12:51
Location: Питер
Has thanked: 20 times
Been thanked: 41 times

Как использовать в макросе Поиск Файлов (Alt-F7)?

Post by Smitis »

maximav wrote:но откуда знать, что порядковый номер "отменить" есть 11? Отдельно узнали и вбили в код?
Посмотреть исходники ;)
Разум когда-нибудь победит.

Post Reply

Return to “Обсуждение макросов”