Unit1.h 1.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  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 "GLBaseClasses.hpp"
  10. #include "GLCoordinates.hpp"
  11. #include "GLCrossPlatform.hpp"
  12. #include "GLFeedback.hpp"
  13. #include "GLObjects.hpp"
  14. #include "GLPolyhedron.hpp"
  15. #include "GLScene.hpp"
  16. #include "GLVectorFileObjects.hpp"
  17. #include "GLWin32Viewer.hpp"
  18. #include "GLMesh.hpp"
  19. //---------------------------------------------------------------------------
  20. class TForm1 : public TForm
  21. {
  22. __published: // IDE-managed Components
  23. TGLSceneViewer *GLSceneViewer1;
  24. TButton *Button1;
  25. TGLScene *GLScene1;
  26. TGLDummyCube *GLDummyCube1;
  27. TGLCamera *GLCamera1;
  28. TGLLightSource *GLLightSource1;
  29. TGLFreeForm *GLFreeForm1;
  30. TGLFeedback *GLFeedback1;
  31. TGLDummyCube *MeshObject1;
  32. TGLCube *GLCube1;
  33. TGLDodecahedron *GLDodecahedron1;
  34. TGLDummyCube *MeshObject2;
  35. TGLSphere *GLSphere1;
  36. TGLMesh *GLMesh1;
  37. void __fastcall Button1Click(TObject *Sender);
  38. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  39. int X, int Y);
  40. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  41. int Y);
  42. private: // User declarations
  43. int mx, my;
  44. public: // User declarations
  45. __fastcall TForm1(TComponent* Owner);
  46. };
  47. //---------------------------------------------------------------------------
  48. extern PACKAGE TForm1 *Form1;
  49. //---------------------------------------------------------------------------
  50. #endif