Печать Topic is solved

Столкнулись с проблемой в использовании Far? Здесь можно получить помощь.
2useven10
Posts: 5192
Joined: Mon 07 Sep, 2009 10:40
Has thanked: 18 times
Been thanked: 309 times

Печать

Post by 2useven10 »

Latest post of the previous page:

zg, может быть что-то вроде этого добавить в сам фар?
User avatar
DrKnS
Posts: 6114
Joined: Thu 04 Aug, 2005 06:44
Location: Kyiv
Has thanked: 12 times
Been thanked: 426 times

Печать

Post by DrKnS »

Давайте лучше в изкоробочный плагин (и print.cpp туда же).
polinom11
Posts: 6
Joined: Fri 08 Apr, 2022 07:21
Has thanked: 3 times

Печать

Post by polinom11 »

В Total commander есть возможность печати в ассоциированной программе комбинацией Ctrl+F9 (cm_PrintFile). Можно ли в Far организовать печать подобным способом? Возможно есть какой нибудь скрипт?
Shmuel
Posts: 6815
Joined: Thu 23 Mar, 2006 21:36
Location: Israel
Has thanked: 41 times
Been thanked: 526 times

Печать

Post by Shmuel »

polinom11 wrote: Fri 08 Apr, 2022 07:28 Возможно есть какой нибудь скрипт?
В первом приближении можно так:

Code: Select all

Macro {
  description="Print the current file";
  area="Shell"; key="CtrlF9"; -- change the key if needed
  flags="NoFolders";
  action=function()
    local name = APanel.Path.."\\"..APanel.Current
    win.ShellExecute(nil,"print",name)
  end;
}
polinom11
Posts: 6
Joined: Fri 08 Apr, 2022 07:21
Has thanked: 3 times

Печать

Post by polinom11 »

Shmuel, большое спасибо, работает! ) Правда при нажатии комбинации клавиш открывается окно ассоциированной программы. В TC при нажатии Ctrl+F9 сразу начинается печать без открытия каких-либо окон.

PS. Не могу найти кнопочку "Отблагодарить" на форуме (
2useven10
Posts: 5192
Joined: Mon 07 Sep, 2009 10:40
Has thanked: 18 times
Been thanked: 309 times

Печать

Post by 2useven10 »

polinom11 wrote: Tue 12 Apr, 2022 06:15 Не могу найти кнопочку "Отблагодарить"
Поищите её после 5 своих постов на форуме.
Shmuel
Posts: 6815
Joined: Thu 23 Mar, 2006 21:36
Location: Israel
Has thanked: 41 times
Been thanked: 526 times

Печать

Post by Shmuel »

polinom11 wrote: Tue 12 Apr, 2022 06:15 открывается окно ассоциированной программы
Попробуйтн заменить строчку, где ShellExecute на следующую:
win.ShellExecute(nil,"print",name,nil,nil,0)
Последний параметр (ноль) это SW_HIDE. Если и это не подойдёт, поищите SW_HIDE в интернете, там есть другие значения, которые можно попробовать.
polinom11
Posts: 6
Joined: Fri 08 Apr, 2022 07:21
Has thanked: 3 times

Печать

Post by polinom11 »

Shmuel, все получилось, спасибо еще раз! )
Post Reply

Return to “Нужна помощь”