Область.Описание (Area.Alt) Свойство

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

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

Карта1 = ДФ.Карта();
Форма1.ДобавитьДочерний(Карта1);

Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.ИмяКарты = Карта1.Имя;
Изображение1.Стиль.Ширина = "500";
Изображение1.Стиль.Высота = "500";

Область1 = Карта1.ДобавитьДочерний(ДФ.Область());
Область1.Форма = ДФ.Круг(50, 50, 35);
Область1.Описание = "Это круг";
Область1.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";

Область2 = Карта1.ДобавитьДочерний(ДФ.Область());
М1 = Новый Массив();
М1.Добавить(ДФ.Точка(100, 100));
М1.Добавить(ДФ.Точка(200, 80));
М1.Добавить(ДФ.Точка(300, 180));
М1.Добавить(ДФ.Точка(180, 220));
Область2.Форма = ДФ.Полигон(М1);
Область2.Описание = "Это Полигон";
Область2.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";

Область3 = Карта1.ДобавитьДочерний(ДФ.Область());
Область3.Форма = ДФ.Прямоугольник(400, 400, 90, 90);
Область3.Описание = "Это прямоугольник";
Область3.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";

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