СтильКолонкиПолеВвода.ПолеВвода (DataGridTextBoxColumn.TextBox) Свойство

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

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

СеткаДанных1 = Ф.СеткаДанных();
СеткаДанных1.Родитель = Форма1;
СеткаДанных1.ТекстЗаголовка = "Сетка данных";
СеткаДанных1.Стыковка = Ф.СтильСтыковки.Заполнение;
	
ТаблицаДанных1 = Ф.ТаблицаДанных("ТД1");
Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("ФИО", Ф.ТипДанных.Строка));

Стр13 = "Трифонов Юрий Никифорович
|Шигаев Агап Денисович
|Сочеванова Анфиса Георгиевна
|Врунгель Христофор Бонифатьевич
|Шикалов Игнатий Маркович
|Сергеевич Аристарх Изяславович
|Бондарчук Александр Ермолаевич
|Ефремова Ева Степановна
|Моисеева Зинаида Никитевна
|Кузьмова Лиана Игнатиевна
|Ковшутина Алина Игоревна
|Чемериса Дина Глебовна
|Сухоруков Давид Александрович
|Шагидзянова Наталия Николаевна
|Игошина Влада Емельяновна
|Бортник Борис Федосиевич
|Заболотный Евсей Фролович
|Сонин Викентий Мечиславович
|Коваленко Злата Фомевна
|Шатохина Людмила Александровна
|Пряхин Владислав Владимирович";

Для А = 1 По СтрЧислоСтрок(Стр13) Цикл
	ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
КонецЦикла;

М_ФИО = Ф.МассивСписок();
Для А = 1 По СтрЧислоСтрок(Стр13) Цикл
	Стр14 = СтрПолучитьСтроку(Стр13, А);
	М9 = СтрРазделить(Стр14, ",");
	М_ФИО.Добавить(М9[0]);
КонецЦикла;
ТаблицаДанных1.ЗагрузитьКолонку(М_ФИО, 0);

СтильТаблицыСеткиДанных1 = Ф.СтильТаблицыСеткиДанных();
СтильТаблицыСеткиДанных1.ИмяОтображаемого = "ТД1";

СтилиТаблицы1 = СеткаДанных1.СтилиТаблицы;
ИндексСтильТаблицыСеткиДанных1 = СтилиТаблицы1.Добавить(СтильТаблицыСеткиДанных1);

СтильКолонки1 = Ф.СтильКолонкиПолеВвода();
СтильКолонки1.ИмяОтображаемого = "ФИО";
СтильКолонки1.ТекстЗаголовка = "ФИО";
СтильКолонки1.Ширина = 250;
СтильТаблицыСеткиДанных1.СтилиКолонкиСеткиДанных.Добавить(СтильКолонки1);

СеткаДанных1.ИсточникДанных = ТаблицаДанных1;

ПолеВвода1 = СтильКолонки1.ПолеВвода;
ПолеВвода1.ОсновнойЦвет = Ф.Цвет("Красный");
Сообщить("ОсновнойЦвет = " + ПолеВвода1.ОсновнойЦвет.Имя);

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

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

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

СеткаДанных1 = Ф.СеткаДанных();
СеткаДанных1.Родитель = Форма1;
СеткаДанных1.ТекстЗаголовка = "Сетка данных";
СеткаДанных1.Стыковка = Ф.СтильСтыковки.Заполнение;
	
ТаблицаДанных1 = Ф.ТаблицаДанных("ТД1");
Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("ФИО", Ф.ТипДанных.Строка));

Стр13 = "Трифонов Юрий Никифорович
|Шигаев Агап Денисович
|Сочеванова Анфиса Георгиевна
|Врунгель Христофор Бонифатьевич
|Шикалов Игнатий Маркович
|Сергеевич Аристарх Изяславович
|Бондарчук Александр Ермолаевич
|Ефремова Ева Степановна
|Моисеева Зинаида Никитевна
|Кузьмова Лиана Игнатиевна
|Ковшутина Алина Игоревна
|Чемериса Дина Глебовна
|Сухоруков Давид Александрович
|Шагидзянова Наталия Николаевна
|Игошина Влада Емельяновна
|Бортник Борис Федосиевич
|Заболотный Евсей Фролович
|Сонин Викентий Мечиславович
|Коваленко Злата Фомевна
|Шатохина Людмила Александровна
|Пряхин Владислав Владимирович";

Для А = 1 По СтрЧислоСтрок(Стр13) Цикл
	ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
КонецЦикла;

М_ФИО = Ф.МассивСписок();
Для А = 1 По СтрЧислоСтрок(Стр13) Цикл
	Стр14 = СтрПолучитьСтроку(Стр13, А);
	М9 = СтрРазделить(Стр14, ",");
	М_ФИО.Добавить(М9[0]);
КонецЦикла;
ТаблицаДанных1.ЗагрузитьКолонку(М_ФИО, 0);

СтильТаблицыСеткиДанных1 = Ф.СтильТаблицыСеткиДанных();
СтильТаблицыСеткиДанных1.ИмяОтображаемого = "ТД1";

СтилиТаблицы1 = СеткаДанных1.СтилиТаблицы;
ИндексСтильТаблицыСеткиДанных1 = СтилиТаблицы1.Добавить(СтильТаблицыСеткиДанных1);

СтильКолонки1 = Ф.СтильКолонкиПолеВвода();
СтильКолонки1.ИмяОтображаемого = "ФИО";
СтильКолонки1.ТекстЗаголовка = "ФИО";
СтильКолонки1.Ширина = 250;
СтильТаблицыСеткиДанных1.СтилиКолонкиСеткиДанных.Добавить(СтильКолонки1);

СеткаДанных1.ИсточникДанных = ТаблицаДанных1;

ПолеВвода1 = СтильКолонки1.ПолеВвода;
ПолеВвода1.ОсновнойЦвет = Ф.Цвет("Красный");

Сообщить(?(
ПолеВвода1.ОсновнойЦвет.Имя = "Красный"
, "", "!!! ") + "СтильКолонкиПолеВвода.ПолеВвода (DataGridTextBoxColumn.TextBox) Свойство" + " " + ТекущаяДата());