//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include #include "GLBaseClasses.hpp" #include "GLCoordinates.hpp" #include "GLCrossPlatform.hpp" // Pascal unit #include "GLUtils.hpp" // Pascal unit //--------------------------------------------------------------------------- class TForm1:public TForm { __published: // IDE-managed Components TGLScene * GLScene1; TGLLightSource *GLLightSource1; TGLDummyCube *DummyCube1; TGLFreeForm *FreeForm1; TGLSphere *Sphere1; TGLArrowLine *ArrowLine1; TGLSceneViewer *GLSceneViewer2; TGLCamera *GLCamera2; TGLCadencer *GLCadencer1; TTimer *Timer1; TPanel *Panel1; TLabel *Label1; TLabel *Label2; TLabel *Label3; TLabel *Label5; TLabel *LABuild; TCheckBox *CheckBox1; TCheckBox *CBOctree; TLabel *Label4; TLabel *LabelFPS; void __fastcall GLSceneViewer2MouseDown(TObject * Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall GLSceneViewer2MouseMove(TObject * Sender, TShiftState Shift, int X, int Y); void __fastcall GLCadencer1Progress(TObject * Sender, const double deltaTime, const double newTime); void __fastcall Timer1Timer(TObject * Sender); private: // User declarations public: // User declarations __fastcall TForm1(TComponent * Owner); int mousex, mousey; }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif