Доброго времени суток форумчане и просто случайные прохожие. Разрабатывал я кнопочки для разворачивания и сворачивания элементов дерева значений. Вроде все бы хорошо, но стандартные процедуры отрабатывают долго. Потом вспомнил то что есть горячие клавиши для данных действий, и тут после исследований форумов, как это реализовать зашел в тупик. Вопрос состоит в следующем имеется кнопка на форме обработки, как на нее назначить действие горячих клавиш Свернуть или Развернуть дерево значений? Пробовал указывать сочетание клавиш в свойствах самой кнопки но результата никакого не дало. Надеюсь найдутся энтузиасты, которые уже сталкивались с подобной проблемой)
По теме из базы знаний
Найденные решения
Для разворачивания всех веток дерева или списка значений,
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 107 ) );
P.S Насчет сворачивания пока символа не нашел, как найду отпишу тут, м.б кому пригодится, и есть одна особенность, комбинация отрабатывает только на русской раскладке клавиатуры.
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 107 ) );
P.S Насчет сворачивания пока символа не нашел, как найду отпишу тут, м.б кому пригодится, и есть одна особенность, комбинация отрабатывает только на русской раскладке клавиатуры.
upd. Нашел и для сворачивания тоже, ниже прилагаю код, а также ссылку на все коды кнопок клавиатуры ASCII.
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 109) );
Страничка с кодами:http://jquery.page2page.ru/index.php5/%D0%9A%D0%BE%D0%B4%D1%8B_%D1%81%D0%B8%D0%BC%D0%B2%D0%BE %D0%BB%D0%BE%D0%B2_%D0%B8_%D0%BA%D0%BB%D0%B0%D0%B2%D0%B8%D1% 88
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 109) );
Страничка с кодами:
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
не понятно а зачем тогда "горячие" клавиши назначать на кнопки,
что, ваши тетки мышкой в кнопку попасьь не могут?
это шутка была.
ну а по делу, делайте кнопки а в кнопках через объект Wscript
Ws = Новый COMОбъект("Wscript.shell");
ЭтаФорма.ТекущийЭлемент = ЭлементыФормы.Список; //или ваше дерево
Ws.SendKeys("^A"); //здесь вставьте CTRL Shift +/-
что, ваши тетки мышкой в кнопку попасьь не могут?
это шутка была.
ну а по делу, делайте кнопки а в кнопках через объект Wscript
Ws = Новый COMОбъект("Wscript.shell");
ЭтаФорма.ТекущийЭлемент = ЭлементыФормы.Список; //или ваше дерево
Ws.SendKeys("^A"); //здесь вставьте CTRL Shift +/-
Для разворачивания всех веток дерева или списка значений,
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 107 ) );
P.S Насчет сворачивания пока символа не нашел, как найду отпишу тут, м.б кому пригодится, и есть одна особенность, комбинация отрабатывает только на русской раскладке клавиатуры.
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 107 ) );
P.S Насчет сворачивания пока символа не нашел, как найду отпишу тут, м.б кому пригодится, и есть одна особенность, комбинация отрабатывает только на русской раскладке клавиатуры.
upd. Нашел и для сворачивания тоже, ниже прилагаю код, а также ссылку на все коды кнопок клавиатуры ASCII.
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 109) );
Страничка с кодами:http://jquery.page2page.ru/index.php5/%D0%9A%D0%BE%D0%B4%D1%8B_%D1%81%D0%B8%D0%BC%D0%B2%D0%BE %D0%BB%D0%BE%D0%B2_%D0%B8_%D0%BA%D0%BB%D0%B0%D0%B2%D0%B8%D1% 88
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 109) );
Страничка с кодами:
да что-то на свертку не работает, пришлось сворачивать методом 1С
вот пример упр.формы с ДЗ и кнопками Свернуть/Развернуть
вот пример упр.формы с ДЗ и кнопками Свернуть/Развернуть
Прикрепленные файлы:
ТестПозиционированиеДЗ.epf
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот