Unit1.h 2.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758
  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.Imaging.jpeg.hpp>
  10. #include "GLS.AsyncTimer.hpp"
  11. #include "GLS.BaseClasses.hpp"
  12. #include "GLS.Cadencer.hpp"
  13. #include "GLS.Coordinates.hpp"
  14. #include "GLS.Material.hpp"
  15. #include "GLS.Objects.hpp"
  16. #include "GLS.Scene.hpp"
  17. #include "GLS.VectorFileObjects.hpp"
  18. #include "GLS.SceneViewer.hpp"
  19. #include "GLS.FileMD2.hpp"
  20. #include "GLS.Utils.hpp"
  21. #include "Import.CgGL.hpp"
  22. #include "GLSL.cgShader.hpp"
  23. //---------------------------------------------------------------------------
  24. class TForm1 : public TForm
  25. {
  26. __published: // IDE-managed Components
  27. TGLSceneViewer *GLSceneViewer1;
  28. TGLScene *GLScene1;
  29. TGLDummyCube *GLDummyCube1;
  30. TGLCamera *GLCamera1;
  31. TGLLightSource *GLLightSource1;
  32. TGLActor *GLActor1;
  33. TCgShader *CgCellShader;
  34. TGLMaterialLibrary *GLMaterialLibrary1;
  35. TGLCadencer *GLCadencer1;
  36. TGLAsyncTimer *AsyncTimer1;
  37. void __fastcall FormCreate(TObject *Sender);
  38. void __fastcall CgCellShaderApplyVP(TCgProgram *CgProgram, TObject *Sender);
  39. void __fastcall CgCellShaderInitialize(TCustomCgShader *CgShader);
  40. void __fastcall CgCellShaderApplyFP(TCgProgram *CgProgram, TObject *Sender);
  41. void __fastcall CgCellShaderUnApplyFP(TCgProgram *CgProgram);
  42. void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  43. int X, int Y);
  44. void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X,
  45. int Y);
  46. void __fastcall AsyncTimer1Timer(TObject *Sender);
  47. private: // User declarations
  48. int mx,my;
  49. public: // User declarations
  50. __fastcall TForm1(TComponent* Owner);
  51. };
  52. //---------------------------------------------------------------------------
  53. extern PACKAGE TForm1 *Form1;
  54. //---------------------------------------------------------------------------
  55. #endif