/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/Graph3D/ReGroup1.pas
14 строк
329 B
Mikhalkovich Stanislav
MoveOn -> MoveBy
16 ноя 2020, 20:04
16 ноя 2020, 20:04
562699d
Код
Авторство
О чём код?
uses Graph3D; // ошибка! begin var b := Box(0,0,0,3,1,2,Colors.Blue); var s := Sphere(0,0,2,1,Colors.Green); var b1 := b.Clone; var s1 := s.Clone; var g := Group(b,s); var g1 := Group(b1,s1); g1.MoveByY(3); g.AddChild(g1[0]);// он должен отсоединиться от g! b1.MoveByY(3); end.