|
|
Как свернуть дерево |
☑ |
|
0
picom
22.01.14
✎
15:02
|
8.2 обыч формы
Дерево разворачивается командой
..
ЭлементыФормы.СводТабл.НачальноеОтображениеДерева = НачальноеОтображениеДерева.РаскрыватьВсеУровни;
..
А вот свернуть его после этого командой
ЭлементыФормы.СводТабл.НачальноеОтображениеДерева = НачальноеОтображениеДерева.НеРаскрывать;
не получается.
..
Что я делаю не так?
|
|
|
1
Irbis
22.01.14
✎
15:03
|
Это как с ребенком, если родил обратно уже не засунешь. Ведь недаром же Начальное.
|
|
|
2
WildSery
22.01.14
✎
15:08
|
ТабличноеПоле.Развернуть(<Строка>, <СПодчиненными>);
ТабличноеПоле.Свернуть(<Строка>);
|
|
|
3
picom
22.01.14
✎
15:10
|
(2) Это не ТП
|
|
|
4
Infsams654
22.01.14
✎
15:11
|
(2) это не про ТабличноеПоле
Для Каждого ТекущаяВетка Из МоеДерево.Строки Цикл
Для Каждого ТекущаяСтрока Из ТекущаяВетка.Строки Цикл
ЭлементыФормы.МоеДерево.Свернуть(ТекущаяСтрока);
Если ТекущаяСтрока.Строки.Количество() > 0 Тогда
Для Каждого ТекСтрока Из ТекущаяСтрока.Строки Цикл
ЭлементыФормы.МоеДерево.Свернуть(ТекСтрока);
КонецЦикла;
КонецЕсли;
КонецЦикла;
ЭлементыФормы.МоеДерево.Свернуть(ТекущаяВетка);
КонецЦикла;
аналогично Развернуть
Как то так
|
|
|
5
picom
22.01.14
✎
15:14
|
(4) йееее, спасибо
Для Каждого ТекущаяСтрока Из СводТабл.Строки Цикл
ЭлементыФормы.СводТабл.Свернуть(ТекущаяСтрока);
КонецЦикла;
|
|
|
6
picom
22.01.14
✎
15:15
|
Кстати это долго работает
как клавиши сэмулировать
ctrl shift -
?
|
|
|
7
WildSery
22.01.14
✎
15:20
|
(3) Не ТП? А чем, простите, вы тогда дерево на форме отображаете?
|
|
|
8
Infsams654
22.01.14
✎
15:31
|
(7) сорри, да ТП, задумался
|
|
|
9
bolobol
22.01.14
✎
16:31
|
(6) Эмуляция клавиш для каждого узла дороже встанет. Но раз так - копать пример "Максимизировать окно в 1С7.7", там что-то типа WSShell использовалось.
|
|
