Unit1.h 2.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <GLObjects.hpp> // Pascal unit
  10. #include <GLTexture.hpp> // Pascal unit
  11. #include <GLGeomObjects.hpp> // Pascal unit
  12. #include <GLCelShader.hpp> // Pascal unit
  13. #include <GLAsyncTimer.hpp> // Pascal unit
  14. #include <GLVectorFileObjects.hpp> // Pascal unit
  15. #include <GLWin32Viewer.hpp> // Pascal unit
  16. #include <GLCadencer.hpp> // Pascal unit
  17. #include <GLScene.hpp>
  18. #include "GLBaseClasses.hpp"
  19. #include "GLCoordinates.hpp"
  20. #include "GLCrossPlatform.hpp"
  21. #include "GLMaterial.hpp" // Pascal unit
  22. #include "GLKeyboard.hpp"
  23. #include "GLFileMD2.hpp"
  24. #include "GLUtils.hpp"
  25. //---------------------------------------------------------------------------
  26. class TForm1:public TForm
  27. {
  28. __published: // IDE-managed Components
  29. TGLScene * GLScene1;
  30. TGLSceneViewer *GLSceneViewer1;
  31. TGLMaterialLibrary *GLMaterialLibrary1;
  32. TGLCadencer *GLCadencer1;
  33. TGLCamera *GLCamera1;
  34. TGLDummyCube *GLDummyCube1;
  35. TGLLightSource *GLLightSource1;
  36. TGLActor *GLActor1;
  37. TGLAsyncTimer *AsyncTimer1;
  38. TGLCelShader *GLTexturedCelShader;
  39. TGLCelShader *GLColoredCelShader;
  40. TGLTorus *GLTorus1;
  41. void __fastcall GLSceneViewer1MouseDown(TObject * Sender,
  42. TMouseButton Button,
  43. TShiftState Shift, int X, int Y);
  44. void __fastcall GLSceneViewer1MouseMove(TObject * Sender, TShiftState Shift,
  45. int X, int Y);
  46. void __fastcall AsyncTimer1Timer(TObject * Sender);
  47. void __fastcall GLCadencer1Progress(TObject * Sender,
  48. const double deltaTime,
  49. const double newTime);
  50. private: // User declarations
  51. public: // User declarations
  52. __fastcall TForm1(TComponent * Owner);
  53. int mx, my, lx, ly;
  54. };
  55. //---------------------------------------------------------------------------
  56. extern PACKAGE TForm1 *Form1;
  57. //---------------------------------------------------------------------------
  58. #endif