ГруппаКолонок.Диапазон (Colgroup.Span) Свойство

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

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

Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;

Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);

Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";

ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());

ГруппаКолонок1.Диапазон = 2;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Голубой;

Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Таблица1;
Колонка1.Стиль.Ширина = 200;

Колонка2 = Таблица1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;

Колонка3 = Таблица1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);

ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());

СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());

ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";

ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";

ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";

ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());

СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;

ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";

Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";

Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";

СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);

ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";

Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";

Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";

СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);

ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";

Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";

Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";

Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());

СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);

ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;

Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";

Форма1.Открыть();