Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Дерево+Таблица  как сохранить картинку ? (число прочтений - 3170 )
GwM
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 7
Зарегистрирован: 10. Июня 2008
Дерево+Таблица  как сохранить картинку ?
17. Июня 2008 :: 14:30
Печать  
в силу ряда причин проходит программная обработка  Дерево+Таблица, в частности изменяются пиктограммки.
без команды
     АтрФормы.ОбновитьДерево();
обновления не прорисовываются, но данная команда сворачивает ПОЛНОСТЬЮ дерево...

попытка использовать
                АтрФормы.УстановитьТекущийУзел(ИскомыйАдрес);
дает результат, но только для текущей строки, при этом изображение на экране все равно дергается (свернули, развернули - это все время...)
Может есть другие способы? заранее признателен.
  
Наверх
 
IP записан
 
noprogrammer
1c++ power user
Отсутствует


I Love YaBB 2!

Сообщений: 465
Зарегистрирован: 16. Июня 2006
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #1 - 17. Июня 2008 :: 17:36
Печать  
Других способов вроде нету, но если ты назовешь эти "ряд причин" по которым у тебя меняются картинки может кто нить что и посоветует. (возможно подскажут иной вариант  реализации)
  
Наверх
wwwICQ  
IP записан
 
RinGo
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 26
Местоположение: г.Уфа
Зарегистрирован: 18. Декабря 2007
Пол: Мужской
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #2 - 18. Июня 2008 :: 03:53
Печать  
А как изменяешь пиктограммки? У меня, вродя, такой проблеммы нет...
  
Наверх
 
IP записан
 
GwM
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 7
Зарегистрирован: 10. Июня 2008
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #3 - 18. Июня 2008 :: 05:36
Печать  
конфигурация - ПУБ, дерево отображает структуру производимой продукции, в реальной жизни один (или более) узлов дерева может быть не задействован по целому ряду причин, стало быть его (их) показываем пиктограммкой другого вида... где тщ так
  
Наверх
 
IP записан
 
RinGo
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 26
Местоположение: г.Уфа
Зарегистрирован: 18. Декабря 2007
Пол: Мужской
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #4 - 18. Июня 2008 :: 06:18
Печать  
программная обработка  Дерево+Таблица: изменяются пиктограммки...

покажи кусочек кода - как меняешь пиктогрыммки
  
Наверх
 
IP записан
 
GwM
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 7
Зарегистрирован: 10. Июня 2008
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #5 - 18. Июня 2008 :: 14:18
Печать  
примерно так:
[code]// **************************************
Процедура ПослеРазворачиванияУзла(фф)
     Если АтрФормы.ЗначениеИзДерева(АтрФормы.ТекущаяСтрокаДерева(),"Статус") = 0 Тогда
           АтрФормы.ЗначениеВДерево(АтрФормы.ТекущаяСтрокаДерева(),"Пиктограмма",4);
     Иначе
           АтрФормы.ЗначениеВДерево(АтрФормы.ТекущаяСтрокаДерева(),"Пиктограмма",2);
     КонецЕсли;
КонецПроцедуры


// **************************************
Процедура ПослеСворачиванияУзла(ФФ)
     Если АтрФормы.ЗначениеИзДерева(,"Статус") = 0 Тогда
           АтрФормы.ЗначениеВДерево(,"Пиктограмма",3);
     Иначе
           АтрФормы.ЗначениеВДерево(,"Пиктограмма",1);
     КонецЕсли;
КонецПроцедуры
///[/code]
статус = 0 - пиктограммка (папочка) красного цвета, т.е. исключено
          = 1 - пиктограммка (папочка)  желтого цвета, т.е. можно
« Последняя редакция: 19. Июня 2008 :: 13:33 - АЛьФ »  
Наверх
 
IP записан
 
RinGo
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 26
Местоположение: г.Уфа
Зарегистрирован: 18. Декабря 2007
Пол: Мужской
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #6 - 19. Июня 2008 :: 11:24
Печать  
Не знаю как "проходит программная обработка  Дерево+Таблица" ... На скорую руку у себя на форму с деревем повесил кнопочку(процедура Развернуть()), которая разворачивает все узлы, начиная с корня, при этом просто меняю пикточку... Накакого ОбновитьДерево() - и не моргат.. Вот код, может, поможет:
[code]////////////////////////////////////////////////////////
процедура приРазвернуть(ТЗ)
//
     списокУзлов=создатьОбъект("списокЗначений");
     если типЗначенияСтр(ТЗ)="ТаблицаЗначений" тогда
                 // Корень дерева
                 ТЗ.выбратьСтроки();
                 пока ТЗ.получитьСтроку()=1 цикл
                       если типЗначенияСтр(ТЗ.Узел)="ТаблицаЗначений" тогда
                             списокУзлов.добавитьЗначение(ТЗ.Узел,строка(ТЗ.номерСтроки));
                             менюАФ.развернутьУзел(строка(ТЗ.номерСтроки));
                       конецЕсли;              
                 конецЦикла;
           иначеЕсли типЗначенияСтр(ТЗ)="СписокЗначений" тогда
                 для инд=1 по ТЗ.размерСписка() цикл
                       ТЗ.получитьЗначение(инд).выбратьСтроки();
                       текСтр="";
                       пока ТЗ.получитьЗначение(инд,текСтр).получитьСтроку()=1 цикл
                             если типЗначенияСтр(ТЗ.получитьЗначение(инд).Узел)="ТаблицаЗначений" тогда
                                   списокУзлов.добавитьЗначение(ТЗ.получитьЗначение(инд).Узел,текСтр+"/"+
                                                                                                                        строка(ТЗ.получитьЗначение(инд).номерСтроки));
                                   менюАФ.развернутьУзел(текСтр+"/"+строка(ТЗ.получитьЗначение(инд).номерСтроки));
                             конецЕсли;
                             если найти(текСтр+"/",исхРодитель+"/") > 0 тогда
                                   гПМ",2);
                             конецЕсли;
                             текСтр="";
                       конецЦикла;
                 конецЦикла;
     конецЕсли;
     если списокУзлов.размерСписка()=0 тогда
           возврат;
     конецЕсли;
     //
     приРазвернуть(списокУзлов);
     //
конецПроцедуры

процедура Развернуть()
     исхРодитель="1";
     исхСтрока="1";
     приРазвернуть(менюТЗ)
конецПроцедуры
//////////////////////////////////////////////////////////
[/code]
« Последняя редакция: 19. Июня 2008 :: 13:33 - АЛьФ »  
Наверх
 
IP записан
 
GwM
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 7
Зарегистрирован: 10. Июня 2008
Re:  Дерево+Таблица  как сохранить картинку ?
Ответ #7 - 20. Июня 2008 :: 07:05
Печать  
спасибо, попробую понять, вроде делаю все то-же самое, но таблица постоянно перересовывается, значит где-то недосмотрел...
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать