ФормыДляОдноСкрипта.Флажок (OneScriptForms.CheckBox) Метод

Синтаксис

Флажок()

Параметры

Возвращаемое значение

Тип: Флажок (CheckBox).

Описание

Создаёт новый экземпляр класса Флажок (CheckBox).

Примечание

Пример

Флажок1 = Ф.Флажок();
Полный пример кода 

Копировать     Выделить всё


Перем Ф, Флажок3;

Процедура Флажок3_ПометкаИзменена() Экспорт
	Если Флажок3.Помечен = Истина Тогда
		Флажок3.ЦветФона = Ф.Цвет("Васильковый");
	Иначе
		Флажок3.ЦветФона = Ф.Цвет("Фиолетовый");
	КонецЕсли;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Флажок1 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок1.Границы = Ф.Прямоугольник(10, 10, 100, 25);
Флажок1.Текст = "Флажок1";
Флажок1.АвтоПометка = Истина;
Флажок1.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаЛево;
Флажок1.СостояниеФлажка = Ф.СостояниеФлажка.Помечен;

Флажок2 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок2.Границы = Ф.Прямоугольник(Флажок1.Лево, Флажок1.Низ + 10, 100, 25);
Флажок2.Текст = "Флажок2";
Флажок2.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаПраво;

Флажок3 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок3.Границы = Ф.Прямоугольник(Флажок2.Лево, Флажок2.Низ + 10, 100, 25);
Флажок3.Текст = "Флажок3";
Флажок3.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаЛево;
Флажок3.Оформление = Ф.Оформление.Кнопка;
Флажок3.ПометкаИзменена = Ф.Действие(ЭтотОбъект, "Флажок3_ПометкаИзменена");

Ф.ЗапуститьОбработкуСобытий();

Тестовый код 

Копировать     Выделить всё



Перем Ф, Флажок3;

Процедура Флажок3_ПометкаИзменена() Экспорт
	Если Флажок3.Помечен = Истина Тогда
		Флажок3.ЦветФона = Ф.Цвет("Васильковый");
	Иначе
		Флажок3.ЦветФона = Ф.Цвет("Фиолетовый");
	КонецЕсли;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Флажок1 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок1.Границы = Ф.Прямоугольник(10, 10, 100, 25);
Флажок1.Текст = "Флажок1";
Флажок1.АвтоПометка = Истина;
Флажок1.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаЛево;
Флажок1.СостояниеФлажка = Ф.СостояниеФлажка.Помечен;

Флажок2 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок2.Границы = Ф.Прямоугольник(Флажок1.Лево, Флажок1.Низ + 10, 100, 25);
Флажок2.Текст = "Флажок2";
Флажок2.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаПраво;

Флажок3 = Форма1.ЭлементыУправления.Добавить(Ф.Флажок());
Флажок3.Границы = Ф.Прямоугольник(Флажок2.Лево, Флажок2.Низ + 10, 100, 25);
Флажок3.Текст = "Флажок3";
Флажок3.ВыравниваниеПометки = Ф.ВыравниваниеСодержимого.СерединаЛево;
Флажок3.Оформление = Ф.Оформление.Кнопка;
Флажок3.ПометкаИзменена = Ф.Действие(ЭтотОбъект, "Флажок3_ПометкаИзменена");

Сообщить(?(
"" + Флажок1 = "КлФлажок"
, "", "!!! ") + "ФормыДляОдноСкрипта.Флажок (OneScriptForms.CheckBox) Метод" + " " + ТекущаяДата());

Смотрите также

ФормыДляОдноСкрипта (OneScriptForms) Класс | Библиотека OneScriptForms