|
Вот из 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 привинтить. Может я где-то косячу ?
|