@Teodor7

Пробую создать модель вращения земли вокруг солнца в FireMonkey.
Источник света пришлось поместить вне солнца, так как иначе оно получается черным. (Вращение вокруг черной дыры, а это не то )
Но такой источник делает солнце подгорелым. Нельзя ли как-то добавить солнцу светимости?

https://www.cyberforum.ru/images/attach/jpg.gif

Миниатюры

 

0

@Teodor7

Ну вот и Луна (пометил зеленой стрелкой) не подсвечивается вообще. Добавлена после и такое впечатление "не чувствует" старые источники.
Видимо, следует проштудировать работу с источниками света.

Миниатюры

 

0

@Teodor7

Разобрался. Солнцу надо текстуру присваивать TextureMaterialSource, а Луне LightMaterialSource-ом. А у меня было наоборот.
Теперь источник точно в центре ведёт себя нормально.

Миниатюры

 

0

@TAZAQ

Вот вы выкладываете скрины вашего проекта, сделано классно, не думаете выложить сам проект?

0

@Teodor7

Там всё простенько. Я только начал 3D программировать в Delphi. Прикручиваю ракету. Хочу ей гравитацию приторочить.
Буду рад любым подсказкам.
Вот архив без экзешника:

Вложения

SunSystem.rar (6.35 Мб, 48 просмотров)

0

@TAZAQ

С масштабом поработать, добавить солнцу вращение вокруг оси

0

@TAZAQ

"Растянуть" космос

0

@Teodor7

В реальном масштабе делать не планирую. Выписал параметры орбит планет солнечной системы, массы и т.п.
Слишком большая разница получается.
Я хочу мини игрушку для себя сделать. Полет с учетом гравитации. А не так как обычно - нажал клавишу вправо - ракета вправо летит как на лугу где-нибудь.
Интрига в экономии горючего.

Добавлено через 12 часов 54 минуты
Растянул космос до 1600. Закрутил Солнце (оказалось, вместе с ракетой ).
Как добавлять элементы управления? Хотя бы кнопки, эдитбоксы и т.п. Виндовые уже непригодны? Просто 3D Shape-ы?

Добавлено через 1 час 18 минут
Понятно. Элементы управления кидаются на Layer3D. Я взял TextLayer3D. Теперь можно сделать панель запуска ракеты.

Добавлено через 1 час 47 минут
Сделал гравитацию. Только она по Эйлеру. В результате при малых расстояниях считается с ошибкой. Это дает "релятивистский" эффект - выбрасывает с орбиты "far far away in the galaxy".
И Земля с Луной движутся не по гравитации, а по математике.
Теперь надо столкновения обработать.
Вроде, есть встроенные средства для детектирования столкновений? HitTest похоже к этому ...
Ну и описание в FireMonkey! То ли дело старая добрая Delphi 7!

0

@Teodor7

Обновленный проект. Уже можно поиграться. Ширина формы 1600.

Вложения

SunSystem2.rar (4.91 Мб, 23 просмотров)

0

@Teodor7

HitTest - это не то. это про щелчки по объекту мышкой. Пришлось тупо считать расстояния между ракетой и планетами.
Теперь при столкновении ракета взрывается. Подгоняется импульсами.

Вложения

SunSys2.rar (4.93 Мб, 37 просмотров)

0