Поворот3Д.Икс (Rotate3D.X) Свойство

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

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

Поворот3Д1 = ДФ.Поворот3Д();
Поворот3Д1.Икс = 10;
Поворот3Д1.Игрек = 20;
Поворот3Д1.Зет = 30;
Поворот3Д1.Угол = 30;
Сообщить("Поворот3Д1.Икс = " + Поворот3Д1.Икс);
Сообщить("Поворот3Д1.Игрек = " + Поворот3Д1.Игрек);
Сообщить("Поворот3Д1.Зет = " + Поворот3Д1.Зет);
Сообщить("Поворот3Д1.Угол = " + Поворот3Д1.Угол);

Поворот3Д2 = ДФ.Поворот3Д(16, 18, 32, 30);
Сообщить("Поворот3Д2.Икс = " + Поворот3Д2.Икс);
Сообщить("Поворот3Д2.Игрек = " + Поворот3Д2.Игрек);
Сообщить("Поворот3Д2.Зет = " + Поворот3Д2.Зет);
Сообщить("Поворот3Д2.Угол = " + Поворот3Д2.Угол);

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