Unit1.h 4.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134
  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.ComCtrls.hpp>
  10. #include <Vcl.ExtCtrls.hpp>
  11. #include "GLS.BaseClasses.hpp"
  12. #include "GLS.Cadencer.hpp"
  13. #include "GLS.Coordinates.hpp"
  14. #include "GLS.Graph.hpp"
  15. #include "GLS.Material.hpp"
  16. #include "GLS.Objects.hpp"
  17. #include "GLS.Scene.hpp"
  18. #include "GLS.SceneViewer.hpp"
  19. #include "GLSL.CgShader.hpp"
  20. #include "JPeg.hpp"
  21. #include "GLS.Utils.hpp"
  22. //---------------------------------------------------------------------------
  23. class TForm1 : public TForm
  24. {
  25. __published: // IDE-managed Components
  26. TSplitter *Splitter1;
  27. TPanel *Panel1;
  28. TPageControl *PageControl1;
  29. TTabSheet *TabSheet1;
  30. TSplitter *Splitter3;
  31. TPanel *Panel2;
  32. TLabel *LabelVertProfile;
  33. TCheckBox *CBVertexProgram;
  34. TPanel *Panel11;
  35. TPanel *Panel12;
  36. TMemo *MemoVertCode;
  37. TPanel *Panel13;
  38. TButton *ButtonApplyVP;
  39. TPanel *Panel5;
  40. TLabel *Label2;
  41. TMemo *Memo1;
  42. TButton *Button1;
  43. TButton *Button4;
  44. TTabSheet *TabSheet2;
  45. TSplitter *Splitter2;
  46. TPanel *Panel4;
  47. TLabel *LabelFragProfile;
  48. TCheckBox *CBFragmentProgram;
  49. TPanel *Panel6;
  50. TPanel *Panel7;
  51. TMemo *MemoFragCode;
  52. TPanel *Panel3;
  53. TButton *ButtonApplyFP;
  54. TPanel *Panel8;
  55. TLabel *Label1;
  56. TMemo *Memo3;
  57. TButton *Button2;
  58. TButton *Button3;
  59. TTabSheet *TabSheet3;
  60. TLabel *Label16;
  61. TGroupBox *GroupBox1;
  62. TLabel *Label18;
  63. TLabel *Label3;
  64. TLabel *Label4;
  65. TLabel *Label5;
  66. TLabel *Label6;
  67. TLabel *Label11;
  68. TLabel *Label12;
  69. TLabel *Label14;
  70. TTrackBar *TrackBar1;
  71. TTrackBar *TrackBar2;
  72. TTrackBar *TrackBar3;
  73. TTrackBar *TrackBar4;
  74. TGroupBox *GroupBox2;
  75. TLabel *Label17;
  76. TLabel *Label7;
  77. TLabel *Label8;
  78. TLabel *Label9;
  79. TLabel *Label10;
  80. TLabel *Label13;
  81. TLabel *Label15;
  82. TTrackBar *TrackBar5;
  83. TTrackBar *TrackBar6;
  84. TTrackBar *TrackBar7;
  85. TTrackBar *TrackBar8;
  86. TCheckBox *CheckBox2;
  87. TPanel *Panel9;
  88. TPanel *PanelFPS;
  89. TGLSceneViewer *GLSceneViewer1;
  90. TGLScene *GLScene1;
  91. TGLXYZGrid *GLXYZGrid1;
  92. TGLPlane *GLPlane1;
  93. TGLCamera *GLCamera1;
  94. TGLCadencer *GLCadencer1;
  95. TCgShader *CgShader1;
  96. TTimer *Timer1;
  97. TGLMaterialLibrary *GLMatLib;
  98. void __fastcall FormCreate(TObject *Sender);
  99. void __fastcall CgShader1Initialize(TCustomCgShader *CgShader);
  100. void __fastcall CgShader1ApplyVP(TCgProgram *CgProgram, TObject *Sender);
  101. void __fastcall CgShader1ApplyFP(TCgProgram *CgProgram, TObject *Sender);
  102. void __fastcall CgShader1UnApplyFP(TCgProgram *CgProgram);
  103. void __fastcall CBVertexProgramClick(TObject *Sender);
  104. void __fastcall CBFragmentProgramClick(TObject *Sender);
  105. void __fastcall CheckBox2Click(TObject *Sender);
  106. void __fastcall ButtonApplyFPClick(TObject *Sender);
  107. void __fastcall ButtonApplyVPClick(TObject *Sender);
  108. void __fastcall MemoFragCodeChange(TObject *Sender);
  109. void __fastcall MemoVertCodeChange(TObject *Sender);
  110. void __fastcall Button1Click(TObject *Sender);
  111. void __fastcall Button2Click(TObject *Sender);
  112. void __fastcall Button3Click(TObject *Sender);
  113. void __fastcall Button4Click(TObject *Sender);
  114. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  115. int X, int Y);
  116. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  117. int Y);
  118. void __fastcall GLCadencer1Progress(TObject *Sender, const double deltaTime, const double newTime);
  119. void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta,
  120. TPoint &MousePos, bool &Handled);
  121. void __fastcall Timer1Timer(TObject *Sender);
  122. void __fastcall FormKeyPress(TObject *Sender, System::WideChar &Key);
  123. private: // User declarations
  124. int mx,my;
  125. public: // User declarations
  126. __fastcall TForm1(TComponent* Owner);
  127. };
  128. //---------------------------------------------------------------------------
  129. extern PACKAGE TForm1 *Form1;
  130. //---------------------------------------------------------------------------
  131. #endif