Все что потребуется для этого: на форму добавить кнопку для открытия OpenDialog и CastleControl. Событие для открытия OpenDialog создается в OnClick кнопки. Вот этот код активирует OpenDialog:
1 2 3 4 5 |
if OpenDialog.Execute then begin end; |
Между begin end; прописывается что будет происходить при нажатии кнопки «Открыть» в окне OpenDialog.
В данном случае необходимо в CastleControl загрузить сцену с именем из OpenDialog.FileName – это имя выбранного файла.
Загружается так же как и просто сцену. И так же настраивается:
1 2 3 4 5 |
CastleControl2.Load(OpenDialog.FileName); CastleControl2.MainScene.Spatial := [ssRendering, ssDynamicCollisions]; CastleControl2.MainScene.ProcessEvents := true; |
После нажатия на кнопку «Открыть» в CastleControl загрузится выбранная сцена, но могут возникнуть проблемы совместимости и тогда сцену придется переделывать или перекомпелировать
Об авторе