Unit1.h 2.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657
  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 <math.hpp>
  11. #include "GLBaseClasses.hpp"
  12. #include "GLCadencer.hpp"
  13. #include "GLCoordinates.hpp"
  14. #include "GLCrossPlatform.hpp"
  15. #include "GLObjects.hpp"
  16. #include "GLScene.hpp"
  17. #include "GLTeapot.hpp"
  18. #include "GLWin32Viewer.hpp"
  19. #include "GLKeyboard.hpp"
  20. //---------------------------------------------------------------------------
  21. class TForm1 : public TForm
  22. {
  23. __published: // IDE-managed Components
  24. TGLSceneViewer *GLSceneViewer1;
  25. TRadioGroup *RadioGroup1;
  26. TRadioGroup *RadioGroup2;
  27. TGLScene *GLScene1;
  28. TGLLightSource *GLLightSource1;
  29. TGLTeapot *Teapot1;
  30. TGLDummyCube *DummyCube1;
  31. TGLCamera *GLCamera1;
  32. TGLCadencer *GLCadencer1;
  33. void __fastcall FormKeyPress(TObject *Sender, System::WideChar &Key);
  34. void __fastcall RadioGroup1Click(TObject *Sender);
  35. void __fastcall RadioGroup2Click(TObject *Sender);
  36. void __fastcall GLCamera1CustomPerspective(const TRectangle &viewport, int width,
  37. int height, int DPI, float &viewPortRadius);
  38. void __fastcall GLCadencer1Progress(TObject *Sender, const double deltaTime, const double newTime);
  39. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  40. int X, int Y);
  41. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  42. int Y);
  43. void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta,
  44. TPoint &MousePos, bool &Handled);
  45. private: // User declarations
  46. int mdx, mdy;
  47. double a;
  48. public: // User declarations
  49. __fastcall TForm1(TComponent* Owner);
  50. };
  51. //---------------------------------------------------------------------------
  52. extern PACKAGE TForm1 *Form1;
  53. //---------------------------------------------------------------------------
  54. #endif