Unit1.h 2.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <GLS.GeomObjects.hpp> // Pascal unit
  10. #include <GLS.Cadencer.hpp> // Pascal unit
  11. #include <GLS.SceneViewer.hpp> // Pascal unit
  12. #include <GLS.Objects.hpp> // Pascal unit
  13. #include <GLS.VectorFileObjects.hpp> // Pascal unit
  14. #include <GLS.Scene.hpp> // Pascal unit
  15. #include <ExtCtrls.hpp>
  16. #include "GLS.BaseClasses.hpp"
  17. #include "GLS.Coordinates.hpp"
  18. // Pascal unit
  19. #include "GLS.Utils.hp
  20. #include "GLS.Scene.hpp"p" // Pascal unit
  21. //---------------------------------------------------------------------------
  22. class TForm1:public TForm
  23. {
  24. __published: // IDE-managed Components
  25. TGLScene * GLScene1;
  26. TGLLightSource *GLLightSource1;
  27. TGLDummyCube *DummyCube1;
  28. TGLFreeForm *FreeForm1;
  29. TGLSphere *Sphere1;
  30. TGLArrowLine *ArrowLine1;
  31. TGLSceneViewer *GLSceneViewer2;
  32. TGLCamera *GLCamera2;
  33. TGLCadencer *GLCadencer1;
  34. TTimer *Timer1;
  35. TPanel *Panel1;
  36. TLabel *Label1;
  37. TLabel *Label2;
  38. TLabel *Label3;
  39. TLabel *Label5;
  40. TLabel *LABuild;
  41. TCheckBox *CheckBox1;
  42. TCheckBox *CBOctree;
  43. TLabel *Label4;
  44. TLabel *LabelFPS;
  45. void __fastcall GLSceneViewer2MouseDown(TObject * Sender, TMouseButton Button,
  46. TShiftState Shift, int X, int Y);
  47. void __fastcall GLSceneViewer2MouseMove(TObject * Sender, TShiftState Shift,
  48. int X, int Y);
  49. void __fastcall GLCadencer1Progress(TObject * Sender, const double deltaTime,
  50. const double newTime);
  51. void __fastcall Timer1Timer(TObject * Sender);
  52. private: // User declarations
  53. public: // User declarations
  54. __fastcall TForm1(TComponent * Owner);
  55. int mousex, mousey;
  56. };
  57. //---------------------------------------------------------------------------
  58. extern PACKAGE TForm1 *Form1;
  59. //---------------------------------------------------------------------------
  60. #endif