Unit1.h 1.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <System.Classes.hpp>
  6. #include <Vcl.Controls.hpp>
  7. #include <Vcl.StdCtrls.hpp>
  8. #include <Vcl.Forms.hpp>
  9. #include <Vcl.ExtCtrls.hpp>
  10. #include "GLS.Scene.hpp"
  11. #include "GLS.Objects.hpp"
  12. #include "GLS.Extrusion.hpp"
  13. #include "GLS.Cadencer.hpp"
  14. #include "GLS.VectorGeometry.hpp"
  15. #include "GLS.Texture.hpp"
  16. #include "GLS.SceneViewer.hpp"
  17. #include "GLS.Color.hpp"
  18. #include "GLS.Coordinates.hpp"
  19. #include "GLS.BaseClasses.hpp"
  20. //---------------------------------------------------------------------------
  21. class TForm1 : public TForm
  22. {
  23. __published: // IDE-managed Components
  24. TGLSceneViewer *GLSceneViewer1;
  25. TPanel *PanelFPS;
  26. TGLScene *GLScene1;
  27. TGLDummyCube *DCBase;
  28. TGLSphere *Sphere1;
  29. TGLPipe *Pipe1;
  30. TGLPipe *Pipe2;
  31. TGLPipe *Pipe3;
  32. TGLPipe *Pipe4;
  33. TGLPipe *Pipe5;
  34. TGLLightSource *GLLightSource1;
  35. TGLDummyCube *DCTarget;
  36. TGLCamera *GLCamera1;
  37. TGLCadencer *GLCadencer1;
  38. TTimer *Timer1;
  39. void __fastcall FormCreate(TObject *Sender);
  40. void __fastcall GLCadencer1Progress(TObject *Sender, const double deltaTime, const double newTime);
  41. void __fastcall Timer1Timer(TObject *Sender);
  42. private: // User declarations
  43. public: // User declarations
  44. __fastcall TForm1(TComponent* Owner);
  45. };
  46. //---------------------------------------------------------------------------
  47. extern PACKAGE TForm1 *Form1;
  48. //---------------------------------------------------------------------------
  49. #endif