Доброго времени суток форумчане и просто случайные прохожие. Разрабатывал я кнопочки для разворачивания и сворачивания элементов дерева значений. Вроде все бы хорошо, но стандартные процедуры отрабатывают долго. Потом вспомнил то что есть горячие клавиши для данных действий, и тут после исследований форумов, как это реализовать зашел в тупик. Вопрос состоит в следующем имеется кнопка на форме обработки, как на нее назначить действие горячих клавиш Свернуть или Развернуть дерево значений? Пробовал указывать сочетание клавиш в свойствах самой кнопки но результата никакого не дало. Надеюсь найдутся энтузиасты, которые уже сталкивались с подобной проблемой)
---
Для разворачивания всех веток дерева или списка значений,

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
---
а без кнопок, встали на дерево
Ctrl Shift "-" - свернуть
Ctrl Shift "+" - развернуть
---
Для меня это труда не составит, обработка ведь не для меня, а для простого "Юзверя", а там тетки такие им надо 2 большие кнопки, а не запоминать сочетание из 3-ех кнопок))
---
не понятно а зачем тогда "горячие" клавиши назначать на кнопки,
что, ваши тетки мышкой в кнопку попасьь не могут?
это шутка была.

ну а по делу, делайте кнопки а в кнопках через объект Wscript

 Ws = Новый COMОбъект("Wscript.shell");
 ЭтаФорма.ТекущийЭлемент = ЭлементыФормы.Список; //или ваше дерево
 Ws.SendKeys("^A"); //здесь вставьте CTRL Shift +/-
---
Вот все бы ничего, твой ответ по сути есть решение, но сколько не смотрел форумы и все предложенные там комбинации кнопок, но почему-то так и не смог найти NUM+ может ты знаешь?)
---
Для разворачивания всех веток дерева или списка значений,

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.SendKeys( "^+" + Символ( 109) ); //для светрки
---
да что-то на свертку не работает, пришлось сворачивать методом 1С
вот пример упр.формы с ДЗ и кнопками Свернуть/Развернуть
---
для сворачивания код 109. Ссылку на коды кнопок клавиатуры приложил выше) будьте внимательней)
---
Спасибо, не успел прочитать ваш пост, пока пилил пример