Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: ВыбратьИзМеню(СписокЗначений,)
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Пользователю 1С 7.7 > 1С Бухгалтерия 7.7 для Украины
Vol_M
Я использую метод ВыбратьИзМеню(СписокЗначений,), при нажатие на определенную область выпадает менюшка. Как сделать чтобы при выпадении этой менюшки первый элемент этого списка был уже активным?
igmig65
ТекущаяСтрока(<?>)
Синтаксис:
ТекущаяСтрока(<ИндексСтроки>)
Назначение:
Установить/определить текущий элемент списка в поле диалога.
Возвращает номер текущей строки поля диалога (до его изменения).
Vol_M
Я не совсем понял!
Ты вот так имешь ввиду ссылка = ВыбратьИзМеню(СписокЗначений,).ТекущаяСтрока(0)????
igmig65
Нет, я имел ввиду что нужно попробовать использовать этот метод, а вот где? это уже другой вопрос.
Цитата
Я использую метод ВыбратьИзМеню(СписокЗначений,)

чей метод??? Код в студию.
MATEVI
Типовая процедура из бухии 77. В ПКО
Процедура ВыборВариантаПечати()
    Перем ВыбЗначение;
    ВариантыПечати = СоздатьОбъект("СписокЗначений");
    ВариантыПечати.ДобавитьЗначение(1,"Кассовый ордер");
    ВариантыПечати.ДобавитьЗначение(2,"Печать на бланк строгой отчетности");
    ВариантыПечати.ДобавитьЗначение(3,"Кассовый ордер(устаревший)");
    Если ВариантыПечати.ВыбратьЗначение(выбЗначение,"",,,1) <> 1 Тогда
        Возврат;
    КонецЕсли;
    Если (ВыбЗначение = 1) ИЛИ (ВыбЗначение = 3) Тогда
        ПечатьОрдера(ВыбЗначение);
    ИначеЕсли ВыбЗначение = 2 Тогда
        ПечатьНаБланк();
    КонецЕсли;
КонецПроцедуры
Ardi
2 - выбор маленьким списком (список похож на выбор значения перечисления), также привязанным к позиции элемента диалога
Процедура Сформировать()
//Процедура ВыборВариантаПечати()
    Перем ВыбЗначение;
    ВариантыПечати = СоздатьОбъект("СписокЗначений");
    ВариантыПечати.ДобавитьЗначение(1,"Кассовый ордер");
    ВариантыПечати.ДобавитьЗначение(2,"Печать на бланк строгой отчетности");
    ВариантыПечати.ДобавитьЗначение(3,"Кассовый ордер(устаревший)");
    выбЗначение=2;
    Если ВариантыПечати.ВыбратьЗначение(выбЗначение,"",,,2) <> 1 Тогда
        Возврат;
    КонецЕсли;
    Если (ВыбЗначение = 1) ИЛИ (ВыбЗначение = 3) Тогда
        //ПечатьОрдера(ВыбЗначение);
    ИначеЕсли ВыбЗначение = 2 Тогда
        //ПечатьНаБланк();
    КонецЕсли;

КонецПроцедуры
Vol_M
СПС! Я уже разобрался!
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.