Unit1.h 2.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <System.Classes.hpp>
  6. #include <Vcl.Controls.hpp>
  7. #include <Vcl.StdCtrls.hpp>
  8. #include <Vcl.Forms.hpp>
  9. #include <Vcl.ExtCtrls.hpp>
  10. #include "GLScene.hpp"
  11. #include "GLObjects.hpp"
  12. #include "GLCadencer.hpp"
  13. #include "GLWin32Viewer.hpp"
  14. #include "GLBaseClasses.hpp"
  15. #include "GLCrossPlatform.hpp"
  16. #include "GLTexture.hpp"
  17. #include "GLBitmapFont.hpp"
  18. #include "GLWindowsFont.hpp"
  19. #include "GLBehaviours.hpp"
  20. #include "GLConsole.hpp"
  21. #include "GLCoordinates.hpp"
  22. #include "GLSimpleNavigation.hpp"
  23. #include "GLUtils.hpp"
  24. //---------------------------------------------------------------------------
  25. class TForm1 : public TForm
  26. {
  27. __published: // IDE-managed Components
  28. TSplitter *Splitter1;
  29. TGLSceneViewer *Viewer;
  30. TPanel *Panel1;
  31. TSplitter *Splitter2;
  32. TGroupBox *GroupBox1;
  33. TLabel *Label1;
  34. TLabel *Label2;
  35. TCheckBox *CheckBox1;
  36. TCheckBox *CheckBox2;
  37. TCheckBox *CheckBox3;
  38. TButton *Button1;
  39. TButton *Button2;
  40. TButton *Button6;
  41. TButton *Button7;
  42. TListBox *ListBox1;
  43. TGLCadencer *GLCadencer1;
  44. TGLScene *Scene;
  45. TGLCube *GLCube1;
  46. TGLCamera *GLCamera1;
  47. TGLLightSource *GLLightSource1;
  48. TGLWindowsBitmapFont *Font1;
  49. TTimer *Timer1;
  50. TGLSimpleNavigation *GLSimpleNavigation1;
  51. TGLConsole *GLConsole1;
  52. void __fastcall FormCreate(TObject *Sender);
  53. void __fastcall GLCadencer1Progress(TObject *Sender, const double deltaTime, const double newTime);
  54. void __fastcall FormKeyPress(TObject *Sender, System::WideChar &Key);
  55. void __fastcall FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift);
  56. void __fastcall ViewerMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  57. int X, int Y);
  58. void __fastcall FormResize(TObject *Sender);
  59. void __fastcall CheckBox1Click(TObject *Sender);
  60. void __fastcall CheckBox2Click(TObject *Sender);
  61. void __fastcall CheckBox3Click(TObject *Sender);
  62. void __fastcall Button1Click(TObject *Sender);
  63. void __fastcall Button2Click(TObject *Sender);
  64. void __fastcall Button6Click(TObject *Sender);
  65. void __fastcall Button7Click(TObject *Sender);
  66. private: // User declarations
  67. public: // User declarations
  68. __fastcall TForm1(TComponent* Owner);
  69. void __fastcall OnHelloCommand(const TGLConsoleCommand *ConsoleCommand,
  70. const TGLCustomConsole *Console, TGLUserInputCommand &Command);
  71. void __fastcall OnCommand(const TGLConsoleCommand *ConsoleCommand,
  72. const TGLCustomConsole *Console, TGLUserInputCommand &Command);
  73. };
  74. //---------------------------------------------------------------------------
  75. extern PACKAGE TForm1 *Form1;
  76. //---------------------------------------------------------------------------
  77. #endif