1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859 |
- //---------------------------------------------------------------------------
- #ifndef Unit1H
- #define Unit1H
- //---------------------------------------------------------------------------
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <Buttons.hpp>
- #include <ExtCtrls.hpp>
- #include <GLS.CrossPlatform.hpp> // Pascal unit
- #include <GLS.VectorGeometry.hpp> // Pascal unit
- #include <GLS.Behaviours.hpp> // Pascal unit
- #include <GLS.SceneViewer.hpp> // Pascal unit
- #include <GLS.Objects.hpp> // Pascal unit
- #include <GLS.Scene.hpp> // Pascal unit
- #include <GLS.Cadencer.hpp> // Pascal unit
- #include <GLS.ParticleFX.hpp>
- #include "GLS.BaseClasses.hpp"
- #include "GLS.Coordinates.hpp"
- #include "GLFullScreenViewer.hpp"
- #include "GLS.SceneViewer.hpp"
- #include "GLS.Keyboard.hpp"
- //---------------------------------------------------------------------------
- class TForm1:public TForm
- {
- __published: // IDE-managed Components
- TGLScene * GLScene;
- TGLSceneViewer *GLSceneViewer;
- TGLDummyCube *DCBase;
- TGLDummyCube *DCSrc;
- TGLPolygonPFXManager *PFXSpiral;
- TGLCadencer *GLCadencer;
- TGLParticleFXRenderer *PFXRenderer;
- TGLCamera *GLCamera;
- TTimer *Timer;
- TGLPolygonPFXManager *PFXRing;
- TGLFullScreenViewer *GLFullScreenViewer;
- TPanel *Panel1;
- TSpeedButton *SpeedButton1;
- void __fastcall TimerTimer(TObject * Sender);
- void __fastcall FormResize(TObject * Sender);
- void __fastcall GLSceneViewerDblClick(TObject * Sender);
- void __fastcall GLFullScreenViewerDblClick(TObject * Sender);
- void __fastcall GLFullScreenViewerKeyPress(TObject * Sender, char &Key);
- void __fastcall GLSceneViewerMouseMove(TObject * Sender, TShiftState Shift,
- int X, int Y);
- private: // User declarations
- public: // User declarations
- __fastcall TForm1(TComponent * Owner);
- };
- //---------------------------------------------------------------------------
- extern PACKAGE TForm1 *Form1;
- //---------------------------------------------------------------------------
- #endif
|