Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Две панели инструментов
Goto page Previous  1, 2
 
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы printer-friendly view
View previous topic :: View next topic  
Author Message
Batya



Joined: 15 Dec 2004
Posts: 2227
Location: Москва, Россия

Post (Separately) Posted: Fri Jul 28, 2006 10:45    Post subject: Reply with quote

argo wrote:
проблема оказывается создать кнопку фильтрации. Как на кнопку назначить команду cm_SrcUserSpec с параметрами фильтрации:
*.doc:*.txt или другие типы файлов????

А вот это уже совсем другой вопрос Smile
Это можно только скриптами.
Скрипт *.vbs:
Code:
Dim TCS
Set TCS = CreateObject("TCSCRIPT.Helper")
TCS.SendCommand "cm_SrcUserDef"
TCS.SendKeystroke "*.doc;*.txt"
TCS.SendKeystroke "{ENTER}"
Set TCS = Nothing

Скрипт использует Script Helper.
Back to top
View user's profile Send private message
argo



Joined: 26 Jul 2006
Posts: 10
Location: Хохляндия

Post (Separately) Posted: Fri Jul 28, 2006 10:59    Post subject: Reply with quote

Sad это уже дебри
сын будет заниматься. Ежели что вопросы принимаешь, Батя??
Back to top
View user's profile Send private message
Batya



Joined: 15 Dec 2004
Posts: 2227
Location: Москва, Россия

Post (Separately) Posted: Fri Jul 28, 2006 11:13    Post subject: Reply with quote

argo wrote:
Sad это уже дебри
сын будет заниматься. Ежели что вопросы принимаешь, Батя??

Почему же дебри?
1. Скачай утилиту по ссылке.
2. Запусти ее - регистрация объекта в системе.
3. Сохрани указанный в прошлом посте код в файл с расширением vbs, предварительно указав вместо "*.doc;*.txt" свой фильтр.
4. Повесь это файл на кнопку, как обычный exe-шник.
5. Нажимай кнопку и радуйся жизни Smile

Конечно я вопросы принимаю. Cool
Back to top
View user's profile Send private message
argo



Joined: 26 Jul 2006
Posts: 10
Location: Хохляндия

Post (Separately) Posted: Fri Jul 28, 2006 11:49    Post subject: Reply with quote

Very Happy Пошло!
Не так страшен черт! когда знаешь........ Wink
Back to top
View user's profile Send private message
argo



Joined: 26 Jul 2006
Posts: 10
Location: Хохляндия

Post (Separately) Posted: Fri Jul 28, 2006 12:27    Post subject: Reply with quote

Дальше поехали...
У скриптов есть параметры типа "выполнение в скрытом режиме"
Без показа окна выполнения?
Back to top
View user's profile Send private message
StrangeRRor



Joined: 15 Jul 2006
Posts: 214

Post (Separately) Posted: Fri Jul 28, 2006 12:35    Post subject: Reply with quote

argo
А чем тебя не устраивает cm_SrcUserDef?
Back to top
View user's profile Send private message
Maximus



Joined: 07 Apr 2005
Posts: 927
Location: Украина, Кировоградская обл., г. Знаменка

Post (Separately) Posted: Fri Jul 28, 2006 12:46    Post subject: Reply with quote

Quote:
А чем тебя не устраивает cm_SrcUserDef?

Я так думаю, что таким способом можно наделать кучу кнопок для различных фильтров и не париться каждый раз с его выбором, как в случае с cm_SrcUserDef.
_________________
tcPhonebook|AppLoader|Українізація TC|Ultimate Calendar
Back to top
View user's profile Send private message
argo



Joined: 26 Jul 2006
Posts: 10
Location: Хохляндия

Post (Separately) Posted: Fri Jul 28, 2006 12:46    Post subject: Reply with quote

StrangeRRor wrote:
argo
А чем тебя не устраивает cm_SrcUserDef?

Это команда выбора фильтра причем однго, потом опять выбирай другой фильтр.
А я говорил про применение этого фильтра (причем оперативного применения)
Back to top
View user's profile Send private message
Batya



Joined: 15 Dec 2004
Posts: 2227
Location: Москва, Россия

Post (Separately) Posted: Fri Jul 28, 2006 13:04    Post subject: Reply with quote

argo wrote:
Дальше поехали...
У скриптов есть параметры типа "выполнение в скрытом режиме"
Без показа окна выполнения?

К сожалению, этого пока нет Sad
Volniy, автор Script Helper, обещал попробовать что-нибудь придумать, чтобы не показывать дочерние окна, но пока, видимо, не пошло Sad

Как вариант, можно попробовать поиграться со временем задержки между действиями:
Code:
Dim TCS
Set TCS = CreateObject("TCSCRIPT.Helper")
TCS.Pause = 0
TCS.SendCommand "cm_SrcUserDef"
TCS.SendKeystroke "*.doc;*.txt"
TCS.SendKeystroke "{ENTER}"
Set TCS = Nothing
Back to top
View user's profile Send private message
argo



Joined: 26 Jul 2006
Posts: 10
Location: Хохляндия

Post (Separately) Posted: Fri Jul 28, 2006 13:12    Post subject: Reply with quote

Спасибо мужики!"
Smile В принципе, мне и этого с головой хватает!
Back to top
View user's profile Send private message
Artee



Joined: 17 Feb 2011
Posts: 7

Post (Separately) Posted: Thu Apr 14, 2011 12:16    Post subject: Reply with quote

По прошествии 5 лет возможность включить одновременно 2 и более панели инструментов так и не появилась?
Так неудобно переключать их...
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10420
Location: Россия, Саратов

Post (Separately) Posted: Thu Apr 14, 2011 12:24    Post subject: Reply with quote

Artee
Даже с появлением у кнопок функциональности выпадающих меню и поддержки многострочных панелей с переносом в произвольном месте?
Что конкретно в существующем функционале не так и что конкретно необходимо?
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Artee



Joined: 17 Feb 2011
Posts: 7

Post (Separately) Posted: Thu Apr 14, 2011 14:25    Post subject: Reply with quote

Avada wrote:
Даже с появлением у кнопок функциональности выпадающих меню и поддержки многострочных панелей с переносом в произвольном месте?

Даже не имел представления о таких возможностях, прийдётся обновлять свой древний Тотал. Всё описаное нашёл поиском, спасибо за наводящий вопрос. Rolling Eyes

Avada wrote:
Что конкретно в существующем функционале не так и что конкретно необходимо?

Теперь всё отлично! Smile
Back to top
View user's profile Send private message
MVV



Joined: 15 Oct 2009
Posts: 4815
Location: Ростов-Дон

Post (Separately) Posted: Thu Apr 14, 2011 14:42    Post subject: Reply with quote

Avada

Читаю название темы, думаю, в тотале испокон веков 2 панели... Открываю - про панели инструментов. Странно, что тему за столько лет не переименовали в "Две панели инструментов"... Smile
_________________
TCFS2 + TCFS2Tools: Полноэкранный режим и многое другое (обсуждение)
WINCMD.RU: AskParam, CopyTree, NTLinks, Sudo, VirtualPanel…
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10420
Location: Россия, Саратов

Post (Separately) Posted: Thu Apr 14, 2011 15:05    Post subject: Reply with quote

MVV
Так тема всплыла только в результате поднятия, про неё с 2006 года уже забыть успели... Исправил, конечно.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы All times are GMT + 4 Hours
Goto page Previous  1, 2
Page 2 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group