Вопрос для знатоков 1С81 простой.

Есть справочник с реквизитом ЦветТ типа хранилище значения.
Я пытаюсь записать в него цвет текста но не получается.
Я делаю так:

Процедура Кнопка5Нажатие(Элемент)
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Диалог.Цвет;
    КонецЕсли;
КонецПроцедуры

Процедура ПриОткрытии()
    Если ЦветТ<>Неопределено Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = ЦветТ;
    КонецЕсли;
КонецПроцедуры

Но в отладчике вижу что при открытии формы ЦветТ=Неопределено.

Почему? Реквизиты типа Хранилище значения особые и работать с ними нужно по особому?
Как мне изменить текст модуля чтобы всё работало?

только через Новый

ты можешь выбрать Красный, Зелёный, Синий, но там ещё есть вид цвета

+ всё, что надо определять через Новый (конструктор), надо так и определять

Конечно, для хранения цвета можно использовать реквизит типа строка:

Реквизит1 = ЗначениеВСтрокуВнутр(ЦветТ);

а при открытии:

Если ЗначениеЗаполнено(Реквизит1) Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = ЗначениеИзСтрокиВнутр(Реквизит1);
КонецЕсли;

Но, наверно, проще использовать реквизит типа Хранилище значения без всяких функций, преобразований?

(1) Я не совсем понял. Что "только через Новый". Ведь для определения цвета я использую
    Диалог = Новый ДиалогВыбораЦвета;

(3) А как это будет в коде?

Функция ПолучитьСтатьиБюджетирования(Бюджет) Экспорт
    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    СтатьиБюджета.Ссылка КАК Ссылка,
    |    СтатьиБюджета.Шрифт,
    |    СтатьиБюджета.ЦветФона
    |ИЗ
    |    Справочник.СтатьиБюджета КАК СтатьиБюджета
    |ГДЕ
    |    СтатьиБюджета.Владелец = &Бюджет
    |    И СтатьиБюджета.ПометкаУдаления = ЛОЖЬ";
                  
    Запрос.УстановитьПараметр("Бюджет", Бюджет);
    Результат = Запрос.Выполнить();
    ТаблицаСтатейБюджетирования = Результат.Выгрузить();
    
    Возврат ТаблицаСтатейБюджетирования;
    
КонецФункции // ПолучитьСтатьиБюджетирования()

ТаблицаСтатейБюджетирования = ПолучитьСтатьиБюджетирования(Бюджет);
    
    Настройки.УсловноеОформление.Элементы.Очистить();
    Для Каждого СтрокаТаблицаСтатейБюджетирования Из ТаблицаСтатейБюджетирования Цикл
        Шрифт0 = ЗначениеИзСтрокиВнутр(СтрокаТаблицаСтатейБюджетирования.Шрифт);
        ЦветФона0 = ЗначениеИзСтрокиВнутр(СтрокаТаблицаСтатейБюджетирования.ЦветФона);
        НовыйЭлементОформления = Настройки.УсловноеОформление.Элементы.Добавить();
        НовыйОтбор = НовыйЭлементОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
        НовыйОтбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Статья");
        НовыйОтбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
        НовыйОтбор.ПравоеЗначение = СтрокаТаблицаСтатейБюджетирования.Ссылка;
        ШрифтОформление = НовыйЭлементОформления.Оформление.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Шрифт"));
        ЦветФонаОформление = НовыйЭлементОформления.Оформление.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ЦветФона"));
        УдалитьЭлементОформления = Истина;
        Если Не ШрифтОформление.Значение = Шрифт0 Тогда
            ШрифтОформление.Значение = Шрифт0;
            ШрифтОформление.Использование = Истина;
            УдалитьЭлементОформления = Ложь;
        КонецЕсли;
        Если Не ЦветФона0 = Новый Цвет(255, 255, 255) Тогда
            ЦветФонаОформление.Значение = ЦветФона0;
            ЦветФонаОформление.Использование = Истина;
            УдалитьЭлементОформления = Ложь;
        КонецЕсли;
        Если УдалитьЭлементОформления Тогда
            Настройки.УсловноеОформление.Элементы.Удалить(НовыйЭлементОформления);
        КонецЕсли;
    КонецЦикла;

ТабДок.Область(НС + 1, НК, НС + 1, НК).ГраницаСнизу =
                    Новый Линия(ТабДок.Область(НС, НК, НС, НК).ГраницаСнизу.ТипЛинии, ТабДок.Область(НС, НК, НС, НК).ГраницаСнизу.Толщина, ТабДок.Область(НС, НК, НС, НК).ГраницаСнизу.Отступ);

это примерно тоже самое

(8) Из примера я понял, что реквизиты справочника СтрокаТаблицаСтатейБюджетирования.Шрифт типа строка и СтрокаТаблицаСтатейБюджетирования.ЦветФона тоже типа строка.
А у меня же типа Хранилище значения. Пример со строкой я уже и сам привёл.
Меня интересует, можно ли делать проще, используя реквизит типа Хранилище значения и как обычный реквизит его сохранять, а затем считывать?

ну т.е. и ГраницаСнизу надо присваивать значения только через конструктор, понятно?

(11) в Скд можно приваивать готовое, иначе только через конструктор

(12) У меня не записывается значение в реквизит типа Хранилище значения, поэтому до присваивания далеко.

и надо платформу поменять на 82 минимум

(14) я тебе пытался показать, что не надо хранить само значение, если не получается потом извлечь, а можно хранить его составляющие

а у хз есть метод получить вроде

(13) + (15) У меня речь не идет ни про СКД, ни про конструктор. У меня 1С81, где есть реквизиты типа Хранилище значения.
У меня просто форма справочника, на ней кнопка для выбора цвета текста и его записи в реквизит типа хранилище значения. Это не работает. Вот я и прошу подсказать, почему, где ошибка в приведённом мной коде?
(16) Но я знаю, как можно выкрутиться, используя реквизит типа строка и функцию ЗначениеВСтрокуВнутр().
Но я хочу понять, почему нельзя напрямую пользоваться реквизитом типа Хранилище значения?

ХранилищеЗначения.Получить (ValueStorage.Get)
ХранилищеЗначения (ValueStorage)
Получить (Get)
Синтаксис:

Получить()
Возвращаемое значение:

Тип: Произвольный.
Значение, содержащееся в хранилище.
Описание:

Получает из хранилища сохраненное в нем значение.

Доступность:

Сервер, толстый клиент, внешнее соединение.
Пример:

МояКартинка = ХранилищеКартинки.Получить();

ну и при сохранении чтото типа

Хранилище=Новый ХранилищеЗначения(ЗначениеВСтрокуВнутр(ЗдесьВашиДАнные))

(18) да можно, только через конструктор, что тут непонятно?

Новый - это конструктор

(20) Если использовать функцию ЗначениеВСтрокуВнутр(), то зачем использовать для цвета реквизит типа Хранилище значения? Проще использовать реквизит типа строка!

да по быстрому просто выдернул кусок из старого отчета
у меня там просто тз сохранялась

так то просто уж точно что хочешь (практически) сохранишь

(25) А можешь подправить текст процедур из (0), чтобы всё получилось?

Процедура Кнопка5Нажатие(Элемент)
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Новый ХранилищеЗначения(ЗначениеВСтрокуВнутр(Диалог.Цвет));
    КонецЕсли;
КонецПроцедуры

Процедура ПриОткрытии()
    Если ЦветТ<>Неопределено Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = ЦветТ.Получить();
    КонецЕсли;
КонецПроцедуры

может так?

даже

Процедура ПриОткрытии()
    _Цвет=ЦветТ.Получить();
    Если _Цвет<>Неопределено Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = _Цвет;
    КонецЕсли;
КонецПроцедуры

вот так наверное

(27) Нет, в отладчике вижу, что ЦветТ=Неопределено

(28) На строку

    _Цвет=ЦветТ.Получить();

дает

Значение не является значением объектного типа (Получить)

(27) И всё же, зачем использовать функцию ЗначениеВСтрокуВнутр()?
В этом случае не нужен реквизит типа Хранилище значения!!!
А просто нужен просто типа строка.

ЗначениеВСтрокуВнутр чтобы, например тз (таб. зн.) сохранять
ЦветТ - реквизит справочника типа ХЗ (хран. зн.) ???

скажите мне тип значения ЦветТ

(32) да, и по-моему, здесь функция ЗначениеВСтрокуВнутр() не нужна, либо если использовать эту функцию, то не нужен тип реквизита Хранилище значения, а нужен тип строка.
Но я хочу добиться работы с типом Хранилище значения.

(33) ЦветТ = Диалог.Цвет

(33) Уточняю: в справочнике есть реквизит ЦветТ с типом Хранилище значения. Я в него хочу записать Диалог.Цвет

а как тогда называется реквизит у которого тип хз (хр.зн.) ???

капеч. мы даже не там запнулись.

(33) в (0) описана задача ;)

(37) ???
У реквизита ЦветТ тип Хранилище значения. Я в него хочу записать Диалог.Цвет

а что угадывать буду
просто скажите как у вас называется

Реквизит справочника типа Хранилище значения

имя его

(40) ЦветТ

он бы не ругался как в 30 т.к. у Хран. зн. есть метод Получить() который "Получает из хранилища сохраненное в нем значение" (C) СП

где-то вы врете уважаемый

(43) Хорошо, смотрю в конфу ещё раз ;)

Реквизит ЦветТ, тип - ХранилищеЗначения.

У меня процедура:

Диалог = Новый ДиалогВыбораЦвета;
Если Диалог.Выбрать() Тогда
        ЦветТ = Новый ХранилищеЗначения(Диалог.Цвет);
КонецЕсли;

Процедура ПриОткрытии()
    _Цвет=ЦветТ.Получить();
    Если _Цвет<>Неопределено Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = _Цвет;
    КонецЕсли;
КонецПроцедуры

При открытии формы ругается:
{Справочник.Меню.Форма.ФормаЭлемента1(16)}: Значение не является значением объектного типа (Получить)
    _Цвет=ЦветТ.Получить();

(43) Так что я не вру ;)

Более того, в отладчике я вижу, что после строки:

        ЦветТ = Новый ХранилищеЗначения(Диалог.Цвет);

значение ЦветТ.Получить() - это значение выбранного цвета.

Но ... это значение или "теряется" или я его не могу прочитать при открытии формы справочника.

а после

Процедура Кнопка5Нажатие(Элемент)
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Диалог.Цвет;
    КонецЕсли;
КонецПроцедуры

объект чей реквизит сохраняется?

ну и проверьте перед _Цвет=ЦветТ.Получить();
типзначения(ЦветТ)

что за конфа? большая? может кинете куданить?
А то что-то надоело чуть в темноте ходить

(48) в отладчике ЦветТ имеет значение цвета, выбранного в Диалог.Цвет

А при открытии ЦветТ имеет значение Неопределено!

Поэтому и получить значение не удается.

пилят
как зовут реквизита справочника (какогото) в который мы хотим сохранить значение у которого тип хран.зн. ????????????????????????????

Справочник Меню.
Реквизит ЦветТ, тип - Хранилище значения

(50) Я в этот реквизит ЦветТ хочу сохранить цвет, а не "значение у которого тип хран.зн."

конфа большая.
просто конфа - без данных.
а то мы видать на ночь глядя ходим вокруг да около

большая???

(50) Да, большая.
Но, по-моему, в (0) я всё описал достаточно ясно и максимально подробно, с текстом процедур.
Вот последний вариант процедур:

Процедура Кнопка5Нажатие(Элемент)
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Новый ХранилищеЗначения(Диалог.Цвет);
    КонецЕсли;
КонецПроцедуры

Процедура ПриОткрытии()
    Если ЦветТ<>Неопределено Тогда
        ЭтаФорма.ЭлементыФормы.текстRO.ЦветТекстаПоля = ЦветТ.Получить();
    КонецЕсли;
КонецПроцедуры

Но почему-то при открытии ЦветТ=Неопределено.
Вот в этом и вопрос.

счас не ругается на получить?

Процедура Кнопка5Нажатие(Элемент)
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Новый ХранилищеЗначения(Диалог.Цвет);
    КонецЕсли;
КонецПроцедуры

а вот тут сам справочник сохранить?

(56) Так до получить() не доходит.

уьрать Если ЦветТ<>Неопределено Тогда

и после
    Диалог = Новый ДиалогВыбораЦвета;
    Если Диалог.Выбрать() Тогда
        ЦветТ = Новый ХранилищеЗначения(Диалог.Цвет);
    КонецЕсли;
сохранить справочник

сохраните конфу в файл и выложьте куданить
мне данные не нужны

или есть TeamViewer ?
в почту номер с паролем если что
Nickolay_Mulko собака Mail.ru

(61) Отправил

под какую платформу?

все вижу

(63) 1С:Предприятие 8.1 (8.1.15.14)

пля странно. я походу сплю
Тут видимо проблема в том что присваеваем значения реквизиту прямо в форме элемента. Но почему. Пипец

ну поправить то я поправил
тока почему диалог выбора цвета возращает в аттрибут цвет всегда 0,0,0
не обращал внимания?

плин точно сплю все норм
счас пришлю

ушло

(69) получил, смотрю

я наверное спать - пяты час пошел

(71) ОК

(71) У нас только второй час пошел. ;)

(71) Да, работает, буду разбираться и сравнивать с моей "стряпниной".

Очень странно.

Я заменил твои реквизиты ЦветТекста, ЦветФона и Шрифт на аналогичные по типу свои ЦветТ, ФонТ и ШрифтТ.
Подправил в процедурах и... работать перестало!?
Заменил обратно и... заработало!?
Все - и твои и мои реквизиты в справочнике присутствуют одновременно. Они отличаются только названиями (по крайней мере визуально).

Наверно, какой-то глюк в конфе или...

Всё, тоже пошёл спать.

хз
:)
може какая казявка в свойствах закралась

(77) В свойствах, вроде, визуально всё одинаковое, кроме имён реквизитов.

(77) Что-то, наверняка, есть. Или, на самом деле, глюк конфы - почему-то для моих реквизитов в Хранилище значений поиск не находит значения.

Всё, нашёл. ;)

У меня были реквизиты формы с такими же именами, что и мои реквизиты справочника: ЦветТ, ФонТ и ШрифтТ.
Я их, очевидно, добавил во время своих "экспериментов".

Убрал реквизиты формы и заработало и с моими реквизитами справочника.

:)

не понял где:?

(82) В реквизитах формы.
При редактировании формы у тебя есть вкладки: Диалог, Модуль и Реквизиты.
Вот на вкладке Реквизиты у меня и были эти реквизиты формы, совпадающие по именам с реквизитами справочника.

А вообще, мне кажется, что такие значения, как цвет, шрифт гораздо проще хранить в реквизитах типа строка, используя функции ЗначениеВСтрокуВнутр() и ЗначениеИзСтрокиВнутр().
Кода получается меньше.

а вообще, сейчас, сидя в ванной, я вспомнил что цвет вообще одним числом хранить нужно/можно/лучше