Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки" (число прочтений - 2215 )
rawlik
Junior Member
**
Отсутствует



Сообщений: 53
Зарегистрирован: 11. Сентября 2007
Пол: Мужской
Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки"
17. Марта 2009 :: 13:35
Печать  
Вот из Help-a

Функция ПоказатьМеню ()
     Сервис = СоздатьОбъект("Сервис");
     Список = СоздатьОбъект("СписокЗначений");
     Список.ДобавитьЗначение(1,"Пункт 1");
     Список.ДобавитьЗначение(2,"Пункт 2");
     Список.ДобавитьЗначение(3,"Пункт 3");
     Список.ДобавитьЗначение(4,"Пункт 4");
     Список.ДобавитьЗначение(0,"-");
     // создаем вложенный список
     СписокДоп = СоздатьОбъект("СписокЗначений");
     СписокДоп.ДобавитьЗначение(551,"Пункт 51");
     СписокДоп.ДобавитьЗначение(552,"Пункт 52");
     СписокДоп.ДобавитьЗначение(553,"Пункт 53");
     СписокДоп.ДобавитьЗначение(554,"Пункт 54");
     // добавляем вложенный список
     Список.ДобавитьЗначение(СписокДоп,"Пункт 5");
     Список.ДобавитьЗначение(6,"Пункт 6");
     Список.ДобавитьЗначение(7,"Пункт 7");
     Выб = "";                     
     //Список.ВыбратьЗначение(Выб,,,,1);
     Если Сервис.ВыбратьЗначение(Список,Выб,"Тестовый выбор значения",0) = 1 Тогда
           Сообщить(Выб);
     КонецЕсли;      
КонецФункции


Процедура ПриНажатииПравойКнопки(сост,х,у,фсо)
     ПоказатьМеню();
КонецПроцедуры

Метод отрабатывается, но меню существует доли секунд.
При привязке к "Button"- ов все работает ОК.
Очень хочется "Настоящий" Popup привинтить.
Может я где-то косячу ?
  
Наверх
 
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки"
Ответ #1 - 17. Марта 2009 :: 13:49
Печать  
rawlik писал(а) 17. Марта 2009 :: 13:35:
Вот из Help-a

Функция ПоказатьМеню ()
     Сервис = СоздатьОбъект("Сервис");
     Список = СоздатьОбъект("СписокЗначений");
     Список.ДобавитьЗначение(1,"Пункт 1");
     Список.ДобавитьЗначение(2,"Пункт 2");
     Список.ДобавитьЗначение(3,"Пункт 3");
     Список.ДобавитьЗначение(4,"Пункт 4");
     Список.ДобавитьЗначение(0,"-");
     // создаем вложенный список
     СписокДоп = СоздатьОбъект("СписокЗначений");
     СписокДоп.ДобавитьЗначение(551,"Пункт 51");
     СписокДоп.ДобавитьЗначение(552,"Пункт 52");
     СписокДоп.ДобавитьЗначение(553,"Пункт 53");
     СписокДоп.ДобавитьЗначение(554,"Пункт 54");
     // добавляем вложенный список
     Список.ДобавитьЗначение(СписокДоп,"Пункт 5");
     Список.ДобавитьЗначение(6,"Пункт 6");
     Список.ДобавитьЗначение(7,"Пункт 7");
     Выб = "";                    
     //Список.ВыбратьЗначение(Выб,,,,1);
     Если Сервис.ВыбратьЗначение(Список,Выб,"Тестовый выбор значения",0) = 1 Тогда
           Сообщить(Выб);
     КонецЕсли;      
КонецФункции


Процедура ПриНажатииПравойКнопки(сост,х,у,фсо)
     ПоказатьМеню();
КонецПроцедуры

Метод отрабатывается, но меню существует доли секунд.
При привязке к "Button"- ов все работает ОК.
Очень хочется "Настоящий" Popup привинтить.
Может я где-то косячу ?


Вот так вызывай
Сервис.ВыбратьЗначение(Список,Выб,"Тестовый выбор значения",0, 2)
  
Наверх
 
IP записан
 
rawlik
Junior Member
**
Отсутствует



Сообщений: 53
Зарегистрирован: 11. Сентября 2007
Пол: Мужской
Re: Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки"
Ответ #2 - 17. Марта 2009 :: 14:08
Печать  
Зер Гуд Йа-Йа Улыбка
Заработало, спасибо.
  
Наверх
 
IP записан
 
simply
God Member
*****
Отсутствует


Мечта: избавиться от 1С

Сообщений: 573
Местоположение: Киев
Зарегистрирован: 31. Декабря 2008
Пол: Мужской
Re: Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки"
Ответ #3 - 17. Марта 2009 :: 19:11
Печать  
А еще лучше вызывать ПриОтжатииПравойКнопки()
Код
Выбрать все
Процедура ПриОтжатииПравойКнопки(сост,х,у,фсо)
     ПоказатьМеню();
КонецПроцедуры 

  
Наверх
IP записан
 
avgreen
Senior Member
****
Отсутствует



Сообщений: 254
Местоположение: Украина, Кривой Рог
Зарегистрирован: 20. Октября 2006
Пол: Мужской
Re: Привязка Сервис.ВыбратьЗначение к "ПриНажатииПравойКнопки"
Ответ #4 - 03. Апреля 2009 :: 10:39
Печать  
simply писал(а) 17. Марта 2009 :: 19:11:
А еще лучше вызывать ПриОтжатииПравойКнопки()
Код
Выбрать все
Процедура ПриОтжатииПравойКнопки(сост,х,у,фсо)
     ПоказатьМеню();
КонецПроцедуры 



Огромное спасибо! У меня наконец-то заработало то что не хотело работать фиг знает сколько - а именно вызов стандартного меню в многострочной части документа. Если я при выборе пункта из списка "Стандартное меню" ставил ФСО = 1 то стандартное меню не отрабатывало .... ну или может создавалось на долю секунды как и писал автор трэда, но я не успевал его заметить. А теперь все работает как надо. УРА!   Очень довольный
  
Наверх
ICQ  
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать