Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
18 апр 2024, 03:10

Добовление реквизитов на форму из встроенного языка.

Автор |R|U|D|E|N, 07 фев 2011, 16:13

0 Пользователей и 1 гость просматривают эту тему.

Klyacksa

А как вы создаете командную панель? :) что-то не получается?
ЦитироватьВесь этот сложный огород, сложен только при создании первой формы. А дальше, весь код будет переносится в другие, новые формы, где будут менятся только имена полей, порядок их отображения.
Копи-пастить - это, конечно, хорошо. И легко. Но если уже делаете механизм универсальным, то может имеет смысл тогда вынести это все в общий модуль? Допустим, сделать функцию "ДобавитьТабличноеПоле" и передавать в нее:
1. Имя будущего табличного поля
2. Родителя будущего табличного поля (в смысле, куда будем помещать)
3. таблицу значений с данными ИмяКолонки-ТипКолонки
ну, координаты/размеры можно еще. Ну и т.д., что еще потребуется.

Будет еще гибче и аккуратнее ;)
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

cska-fanat-kz

А если ему еще про УстановитьДействие рассказать? )))

У него начнет вся конфигурация динамически формироваться.

Хорошо что метаданные динамически не добавляются...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Klyacksa

cska-fanat-kz, по-моему, мы и так уже сболтнули лишнего  ;)
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

cska-fanat-kz

Цитата: Klyacksa от 14 фев 2011, 22:45
cska-fanat-kz, по-моему, мы и так уже сболтнули лишнего  ;)

Что? Пора тему закрывать? ;)
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

|R|U|D|E|N

Блин, ну помогите уже точно последний раз в этой теме)) Вы уже во стольком мне омогли. Я думаю, что вам не составит труда показть пример создания таблицы и командной панели к ней.

А мне это жутко поможет. и я буду спать спокойно...)

|R|U|D|E|N

Да и тема эта наверника будет полезна многим...

cska-fanat-kz

Разве нельзя принцип создания предыдущих ЭУ перенести на командную панель?

НоваяКП = ЭлементыФормы.Добавить(Тип("КоманднаяПанель"),"КоманднаяПанельКТаблице",Истина);
НоваяКП.Лево = 8;
НоваяКП.Верх = 33;
НоваяКП.Высота = 24;
НоваяКП.Ширина = 384;

НоваяКП.ИсточникДействий = ЭлементыФормы.ТабличноеПоле1;
НоваяКП.АвтоЗаполнение = Истина;

Следующий вопрос будет "Как создать..." что?
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Klyacksa

cska-fanat-kz , а у тебя получилось сделать автозаполнение? у меня что-то нет(
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

cska-fanat-kz

Цитата: Klyacksa от 15 фев 2011, 13:22
cska-fanat-kz , а у тебя получилось сделать автозаполнение? у меня что-то нет(

Получилось...
Правда я не знаю... Я ТЧ сам создал...
Хочешь сказать попробовать создать динамически?..
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

cska-fanat-kz

Получилось и с динамической ТЧ

НоваяТЧ = ЭлементыФормы.Добавить(Тип("ТабличноеПоле"),"ТабличноеПоле1",Истина);
НоваяТЧ.Лево = 8;
НоваяТЧ.Верх = 60;
НоваяТЧ.Высота = 200;
НоваяТЧ.Ширина = 200;
   
НоваяТЧ.ТипЗначения = Новый ОписаниеТипов("СправочникСписок.Номенклатура");
   
НоваяТЧ.СоздатьКолонки();
   
НоваяКП = ЭлементыФормы.Добавить(Тип("КоманднаяПанель"),"КоманднаяПанельКТаблице",Истина);
НоваяКП.Лево   = 8;
НоваяКП.Верх   = 33;
НоваяКП.Высота = 24;
НоваяКП.Ширина = 384;

НоваяКП.ИсточникДействий = ЭлементыФормы.ТабличноеПоле1;
НоваяКП.АвтоЗаполнение = Истина;
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск