ПолосаТаблицы.Метка (DataGridViewBand.Tag) Свойство

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

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

Форма1 = Ф.Форма();
Форма1.Ширина = 500;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Таблица1 = Ф.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стыковка = Ф.СтильСтыковки.Заполнение;

Таблица1.КоличествоКолонок = 20;
Таблица1.КоличествоСтрок = 7;

Для А = 0 По Таблица1.Колонки.Количество - 1 Цикл
	Колонка = Таблица1.Колонки(А);
	Колонка.ТекстЗаголовка = "Кол" + А;
	Колонка.РежимСортировки = Ф.РежимСортировки.Программный;
КонецЦикла;
Для А = 0 По Таблица1.Строки.Количество - 1 Цикл
	Таблица1.Строки(А).ЗаголовокСтроки.Значение = "" + А;
КонецЦикла;

Таблица1.РежимВыбора = Ф.РежимВыбораТаблицы.Колонка;

ПолосаТаблицы1 = Таблица1.Колонки(2);
Сообщить("Тип значения колонки = " + ТипЗнч(ПолосаТаблицы1));
ПолосаТаблицы1.Выбран = Истина;

Коллекция1 = ПолосаТаблицы1.Метка;
Коллекция1.Добавить(Форма1, "Объект");
Коллекция1.Добавить("Форма1", "Имя");
Коллекция1.Добавить(Истина, "Булево");
Коллекция1.Добавить(156.35, "Число");
Коллекция1.Добавить(Дата(1984,03,26,06,24,21), "Дата");

Сообщить("Объект = " + ПолосаТаблицы1.Метка.Элемент("Объект"));
Сообщить("Имя = " + ПолосаТаблицы1.Метка.Элемент("Имя"));
Сообщить("Булево = " + ПолосаТаблицы1.Метка.Элемент("Булево"));
Сообщить("Число = " + ПолосаТаблицы1.Метка.Элемент("Число") / 2);
Сообщить("Дата = " + ПолосаТаблицы1.Метка.Элемент("Дата"));

ПолосаТаблицы1.Метка.Удалить("Булево");
ПолосаТаблицы1.Метка.Добавить(Ложь, "Булево");

Сообщить("Новое Булево = " + ПолосаТаблицы1.Метка.Элемент("Булево"));

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

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

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

Форма1 = Ф.Форма();
Форма1.Ширина = 500;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Таблица1 = Ф.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стыковка = Ф.СтильСтыковки.Заполнение;

Таблица1.КоличествоКолонок = 20;
Таблица1.КоличествоСтрок = 7;

Для А = 0 По Таблица1.Колонки.Количество - 1 Цикл
	Колонка = Таблица1.Колонки(А);
	Колонка.ТекстЗаголовка = "Кол" + А;
	Колонка.РежимСортировки = Ф.РежимСортировки.Программный;
КонецЦикла;
Для А = 0 По Таблица1.Строки.Количество - 1 Цикл
	Таблица1.Строки(А).ЗаголовокСтроки.Значение = "" + А;
КонецЦикла;

Таблица1.РежимВыбора = Ф.РежимВыбораТаблицы.Колонка;

ПолосаТаблицы1 = Таблица1.Колонки(2);
// Сообщить("Тип значения колонки = " + ТипЗнч(ПолосаТаблицы1));
ПолосаТаблицы1.Выбран = Истина;

Коллекция1 = ПолосаТаблицы1.Метка;
Коллекция1.Добавить(Форма1, "Объект");
Коллекция1.Добавить("Форма1", "Имя");
Коллекция1.Добавить(Истина, "Булево");
Коллекция1.Добавить(156.35, "Число");
Коллекция1.Добавить(Дата(1984,03,26,06,24,21), "Дата");

// Сообщить("Объект = " + ПолосаТаблицы1.Метка.Элемент("Объект"));
// Сообщить("Имя = " + ПолосаТаблицы1.Метка.Элемент("Имя"));
// Сообщить("Булево = " + ПолосаТаблицы1.Метка.Элемент("Булево"));
// Сообщить("Число = " + ПолосаТаблицы1.Метка.Элемент("Число") / 2);
// Сообщить("Дата = " + ПолосаТаблицы1.Метка.Элемент("Дата"));

ПолосаТаблицы1.Метка.Удалить("Булево");
ПолосаТаблицы1.Метка.Добавить(Ложь, "Булево");

// Сообщить("Новое Булево = " + ПолосаТаблицы1.Метка.Элемент("Булево"));

Сообщить(?(
Коллекция1 = ПолосаТаблицы1.Метка
, "", "!!! ") + "ПолосаТаблицы.Метка (DataGridViewBand.Tag) Свойство" + " " + ТекущаяДата());