ЯчейкаЗаголовка.ДиапазонСтрок (HeaderCell.RowSpan) Свойство

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

ЯчейкаЗаголовка5.ДиапазонСтрок = 2;

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