1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859 |
- //---------------------------------------------------------------------------
- #ifndef Unit1H
- #define Unit1H
- //---------------------------------------------------------------------------
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <Buttons.hpp>
- #include <ExtCtrls.hpp>
- #include <GLCrossPlatform.hpp> // Pascal unit
- #include <GLVectorGeometry.hpp> // Pascal unit
- #include <GLBehaviours.hpp> // Pascal unit
- #include <GLWin32Viewer.hpp> // Pascal unit
- #include <GLObjects.hpp> // Pascal unit
- #include <GLScene.hpp> // Pascal unit
- #include <GLCadencer.hpp> // Pascal unit
- #include <GLParticleFX.hpp>
- #include "GLBaseClasses.hpp"
- #include "GLCoordinates.hpp"
- #include "GLFullScreenViewer.hpp"
- #include "GLWin32Viewer.hpp"
- #include "GLKeyboard.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
|