fPathControlC.h 1.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. //---------------------------------------------------------------------------
  2. #ifndef fPathControlCH
  3. #define fPathControlCH
  4. //---------------------------------------------------------------------------
  5. #include <System.Classes.hpp>
  6. #include <Vcl.Controls.hpp>
  7. #include <Vcl.StdCtrls.hpp>
  8. #include <Vcl.Forms.hpp>
  9. #include <Vcl.Buttons.hpp>
  10. #include "GLS.BaseClasses.hpp"
  11. #include "GLS.Cadencer.hpp"
  12. #include "GLS.Coordinates.hpp"
  13. #include "GLS.Objects.hpp"
  14. #include "GLS.Scene.hpp"
  15. #include "GLS.SimpleNavigation.hpp"
  16. #include "GLS.SceneViewer.hpp"
  17. #include "GLS.Movement.hpp"
  18. //---------------------------------------------------------------------------
  19. class TFormPathControl : public TForm
  20. {
  21. __published: // IDE-managed Components
  22. TGLSceneViewer *GLSceneViewer1;
  23. TBitBtn *MoveBtn;
  24. TGLScene *GLScene1;
  25. TGLDummyCube *dcModel;
  26. TGLCube *Cube;
  27. TGLLightSource *LightSource;
  28. TGLSphere *Planet;
  29. TGLCamera *Camera;
  30. TGLCadencer *GLCadencer1;
  31. TGLSimpleNavigation *GLSimpleNavigation1;
  32. TGLSphere *Sun;
  33. void __fastcall FormActivate(TObject *Sender);
  34. void __fastcall MoveBtnClick(TObject *Sender);
  35. private: // User declarations
  36. void PathTravelStop(TObject *Sender, TGLMovementPath *Path, bool Looped);
  37. void PathAllTravelledOver(TObject *Sender);
  38. public: // User declarations
  39. __fastcall TFormPathControl(TComponent* Owner);
  40. };
  41. //---------------------------------------------------------------------------
  42. extern PACKAGE TFormPathControl *FormPathControl;
  43. //---------------------------------------------------------------------------
  44. #endif