Unit1.h 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <tchar.h>
  6. #include <System.Classes.hpp>
  7. #include <Vcl.Controls.hpp>
  8. #include <Vcl.StdCtrls.hpp>
  9. #include <Vcl.Forms.hpp>
  10. #include <Vcl.ComCtrls.hpp>
  11. #include <Vcl.ExtCtrls.hpp>
  12. #include "GLScene.hpp"
  13. #include "GLCadencer.hpp"
  14. #include "GLWin32Viewer.hpp"
  15. #include "GLCoordinates.hpp"
  16. #include "GLBaseClasses.hpp"
  17. #include "GLCrossPlatform.hpp"
  18. #include "GLExplosionFx.hpp"
  19. #include "GLVectorFileObjects.hpp"
  20. //---------------------------------------------------------------------------
  21. class TForm1 : public TForm
  22. {
  23. __published: // IDE-managed Components
  24. TGLSceneViewer *Viewer;
  25. TPanel *Panel1;
  26. TLabel *Label2;
  27. TLabel *Label1;
  28. TLabel *Label3;
  29. TCheckBox *CheckOn;
  30. TButton *Button1;
  31. TProgressBar *StepBar;
  32. TTrackBar *MaxStepsBar;
  33. TTrackBar *SpeedBar;
  34. TGLScene *GLScene1;
  35. TGLFreeForm *mesh;
  36. TGLCamera *Camera1;
  37. TGLLightSource *GLLightSource1;
  38. TGLCadencer *GLCadencer1;
  39. void __fastcall FormCreate(TObject *Sender);
  40. void __fastcall CheckOnClick(TObject *Sender);
  41. void __fastcall Button1Click(TObject *Sender);
  42. void __fastcall ViewerMouseMove(TObject *Sender, TShiftState Shift, int X, int Y);
  43. void __fastcall ViewerMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  44. int X, int Y);
  45. void __fastcall GLCadencer1Progress(TObject *Sender, const double deltaTime, const double newTime);
  46. void __fastcall SpeedBarChange(TObject *Sender);
  47. void __fastcall MaxStepsBarChange(TObject *Sender);
  48. private: // User declarations
  49. int vx, vy;
  50. TGLMeshObjectList *Cache;
  51. TGLBExplosionFX *expl;
  52. public: // User declarations
  53. __fastcall TForm1(TComponent* Owner);
  54. };
  55. //---------------------------------------------------------------------------
  56. extern PACKAGE TForm1 *Form1;
  57. //---------------------------------------------------------------------------
  58. #endif