Unit1.h 2.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <vcl.h>
  6. #include <tchar.h>
  7. //---------------------------------------------------------------------------
  8. #include <System.Classes.hpp>
  9. #include <Vcl.Controls.hpp>
  10. #include <Vcl.StdCtrls.hpp>
  11. #include <Vcl.Forms.hpp>
  12. #include <Vcl.ExtCtrls.hpp>
  13. #include "GLScene.hpp"
  14. #include "GLObjects.hpp"
  15. #include "GLVectorGeometry.hpp"
  16. #include "GLTexture.hpp"
  17. #include "GLCadencer.hpp"
  18. #include "GLMesh.hpp"
  19. #include "GLWin32Viewer.hpp"
  20. #include "GLState.hpp"
  21. #include "GLColor.hpp"
  22. #include "GLCrossPlatform.hpp"
  23. #include "GLBaseClasses.hpp"
  24. #include "GLCoordinates.hpp"
  25. //---------------------------------------------------------------------------
  26. class TForm1 : public TForm
  27. {
  28. __published: // IDE-managed Components
  29. TGLSceneViewer *GLSceneViewer1;
  30. TGLSceneViewer *GLSceneViewer2;
  31. TPanel *Panel1;
  32. TLabel *Label1;
  33. TLabel *Label2;
  34. TGLScene *GLScene1;
  35. TGLDummyCube *DummyCube1;
  36. TGLMesh *Mesh1;
  37. TGLLightSource *GLLightSource1;
  38. TGLCamera *GLCamera1;
  39. TTimer *Timer1;
  40. TGLScene *GLScene2;
  41. TGLDummyCube *DummyCube2;
  42. TGLMesh *Mesh2;
  43. TGLLightSource *GLLightSource2;
  44. TGLCamera *GLCamera2;
  45. void __fastcall FormCreate(TObject *Sender);
  46. void __fastcall Timer1Timer(TObject *Sender);
  47. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  48. int X, int Y);
  49. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  50. int Y);
  51. void __fastcall GLSceneViewer2MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  52. int X, int Y);
  53. void __fastcall GLSceneViewer2MouseMove(TObject *Sender, TShiftState Shift, int X,
  54. int Y);
  55. private: // User declarations
  56. int mx, my;
  57. float invRes1, invRes2;
  58. TAffineVector __fastcall MakeVect(const float aX, const float aY);
  59. void __fastcall AddTriangle(const TAffineVector p1,
  60. const TAffineVector p2,
  61. const TAffineVector p3,
  62. const TColorVector color);
  63. public: // User declarations
  64. __fastcall TForm1(TComponent* Owner);
  65. };
  66. //---------------------------------------------------------------------------
  67. extern PACKAGE TForm1 *Form1;
  68. //---------------------------------------------------------------------------
  69. #endif