Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Поле со списком в форме внешней обработки          
vadim007 Подменю пользователя
сообщение 12.08.15, 13:21
Сообщение #1

Почти крутой
Иконка группы
Группа: Местный
Сообщений: 1298
Из: Донецк
Спасибо сказали: 208 раз
Рейтинг: 0

Всем привет.
Как на форме внешней обработки создать поле с раскрывающимся списком?
Аналог поля со списком в семерке.
Хочу в этом списке вывести все документы для выбора:
КолДок = Метаданные.Документы.Количество();
Сообщить(КолДок);
Для ин=1 По КолДок Цикл
    Док = Метаданные.Документы[ин-1];
    Сообщить(Док);
    спДокументы.Добавить(Док);
КонецЦикла;


Сообщение отредактировал vadim007 - 12.08.15, 13:36

logist Подменю пользователя
сообщение 12.08.15, 13:48
Сообщение #2

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

Для Каждого Док Из Метаданные.Документы Цикл
    ЭлементыФормы.ПолеВыбора1.СписокВыбора.Добавить(Док.Имя, Док.ПредставлениеОбъекта);
КонецЦикла;


Signature
Личные бесплатные консультации не даю, для этого есть форум!

Спасибо сказали: vadim007,

vadim007 Подменю пользователя
сообщение 12.08.15, 14:39
Сообщение #3

Почти крутой
Иконка группы
Группа: Местный
Сообщений: 1298
Из: Донецк
Спасибо сказали: 208 раз
Рейтинг: 0

Я по старинке:
Процедура ПриОткрытии()
    КолДок = Метаданные.Документы.Количество();
    Для ин=0 По КолДок-1 Цикл
        Док = Метаданные.Документы[ин].Имя;
        спДокументы.Добавить(Док);
    КонецЦикла;
    ЭлементыФормы.Документ.СписокВыбора = спДокументы;
КонецПроцедуры


Но это только начало. Продолжение - найти события, на которые подписан выбранный документ:
КолПодписок = Метаданные.ПодпискиНаСобытия.Количество();
Для ин=0 по КолПодписок-1 Цикл
    Обк = Метаданные.ПодпискиНаСобытия[ин];
    Сообщить(Обк);
    Если Обк.Источник.СодержитТип(Документ) Тогда
          Сообщить(Метаданные.ПодпискиНаСобытия[ин].Обработчик);
          Сообщить(Метаданные.ПодпискиНаСобытия[ин].Событие);
    КонецЕсли;
КонецЦикла;

Здесь ошибка, т.к. Документ - текстового типа.
Как правильно?

logist Подменю пользователя
сообщение 12.08.15, 14:45
Сообщение #4

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

Для ин=0 по КолПодписок-1 Цикл

Можно научиться программировать на 8-ке, но забыть программирование на 7-ке невозможно? smile.gif


Signature
Личные бесплатные консультации не даю, для этого есть форум!

vadim007 Подменю пользователя
сообщение 12.08.15, 14:49
Сообщение #5

Почти крутой
Иконка группы
Группа: Местный
Сообщений: 1298
Из: Донецк
Спасибо сказали: 208 раз
Рейтинг: 0

Цитата(logist @ 12.08.15, 15:45) *
Можно научиться программировать на 8-ке, но забыть программирование на 7-ке невозможно? smile.gif

Ничего, отвыкну. Давным-давно программировал на Алгол-68, Лисп - вот это была силища.

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 26.04.24, 5:17
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!