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

Как скрыть\отобразить элементы формы меняя значение булево

Автор steeshiy, 07 мар 2019, 19:53

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

steeshiy

Добрый день! Помогите, пожалуйста, с простым решением:
Справочник контрагенты. На форме элемента справочника реквизиты относящиеся к юр. лицам и к физ лицам объединены в группы: ГруппаЮрЛица, ГруппаФизЛица. Есть реквизит ЮрЛицо тип булево.
Подскажите пример кода, при котором: если значение реквизита ЮрЛицо = ИСТИНА, ГруппаФизЛица Скрыта, ГруппаЮрЛица - видима;  если ЛОЖЬ - то скрыта ГруппаЮрЛица, а ГруппаФизЛица Видима.
Заранее спасибо!

P. S. 1С 8.3 управляемые формы.

Vit1501

&НаКлиенте
Процедура ЮрЛицоПриИзменении(Элемент)
    УстановитьВидимостьЭлементов();
КонецПроцедуры

&НаКлиенте
Процедура ПриОткрытии()
    УстановитьВидимостьЭлементов();
КонецПроцедуры

&НаКлиенте
Процедура УстановитьВидимостьЭлементов()
    Если ЮрЛицо=Истина Тогда
        Элементы.ГруппаЮрлицо.Видимость = Истина;
        Элементы.ГруппаФизлицо.Видимость = Ложь;
    Иначе
        Элементы.ГруппаЮрлицо.Видимость = Ложь;
        Элементы.ГруппаФизлицо.Видимость = Истина;
    КонецЕсли;
КонецПроцедуры


можно так попробовать

LexaK

да-а-а, наверно зарплата от количества строчек кода зависит?

&НаКлиенте
Процедура УстановитьВидимостьЭлементов()
    Если ЮрЛицо=Истина Тогда
        Элементы.ГруппаЮрлицо.Видимость = Истина;
        Элементы.ГруппаФизлицо.Видимость = Ложь;
    Иначе
        Элементы.ГруппаЮрлицо.Видимость = Ложь;
        Элементы.ГруппаФизлицо.Видимость = Истина;
    КонецЕсли;
КонецПроцедуры


тоже самое

&НаКлиенте
Процедура УстановитьВидимостьЭлементов()
        Элементы.ГруппаЮрлицо.Видимость  =    ЮрЛицо;
        Элементы.ГруппаФизлицо.Видимость = Не ЮрЛицо;
КонецПроцедуры
если помогло нажмите: Спасибо!

steeshiy

Спасибо большое!

Все делал так же, не хватало процедуры ПриОткрытии. Как ее написал - все заработало!


Теги:

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

Рейтинг@Mail.ru

Поиск