fFormulaC.h 2.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273
  1. //---------------------------------------------------------------------------
  2. #ifndef fFormulaCH
  3. #define fFormulaCH
  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 "GLS.Scene.hpp"
  14. #include "GLS.Objects.hpp"
  15. #include "GLS.VectorGeometry.hpp"
  16. #include "GLS.Texture.hpp"
  17. #include "GLS.Cadencer.hpp"
  18. #include "GLS.Mesh.hpp"
  19. #include "GLS.SceneViewer.hpp"
  20. #include "GLS.State.hpp"
  21. #include "GLS.Color.hpp"
  22. #include "GLS.BaseClasses.hpp"
  23. #include "GLS.Coordinates.hpp"
  24. //---------------------------------------------------------------------------
  25. class TForm1 : public TForm
  26. {
  27. __published: // IDE-managed Components
  28. TGLSceneViewer *GLSceneViewer1;
  29. TGLSceneViewer *GLSceneViewer2;
  30. TPanel *Panel1;
  31. TLabel *Label1;
  32. TLabel *Label2;
  33. TGLScene *GLScene1;
  34. TGLDummyCube *DummyCube1;
  35. TGLMesh *Mesh1;
  36. TGLLightSource *GLLightSource1;
  37. TGLCamera *GLCamera1;
  38. TTimer *Timer1;
  39. TGLScene *GLScene2;
  40. TGLDummyCube *DummyCube2;
  41. TGLMesh *Mesh2;
  42. TGLLightSource *GLLightSource2;
  43. TGLCamera *GLCamera2;
  44. void __fastcall FormCreate(TObject *Sender);
  45. void __fastcall Timer1Timer(TObject *Sender);
  46. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  47. int X, int Y);
  48. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  49. int Y);
  50. void __fastcall GLSceneViewer2MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  51. int X, int Y);
  52. void __fastcall GLSceneViewer2MouseMove(TObject *Sender, TShiftState Shift, int X,
  53. int Y);
  54. private: // User declarations
  55. int mx, my;
  56. float invRes1, invRes2;
  57. TAffineVector __fastcall MakeVect(const float aX, const float aY);
  58. void __fastcall AddTriangle(const TAffineVector p1,
  59. const TAffineVector p2,
  60. const TAffineVector p3,
  61. const TColorVector color);
  62. public: // User declarations
  63. __fastcall TForm1(TComponent* Owner);
  64. };
  65. //---------------------------------------------------------------------------
  66. extern PACKAGE TForm1 *Form1;
  67. //---------------------------------------------------------------------------
  68. #endif