Unit1.h 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172
  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include "GLCadencer.hpp"
  10. #include "GLObjects.hpp"
  11. #include "GLScene.hpp"
  12. #include "GLTexture.hpp"
  13. #include "GLWin32Viewer.hpp"
  14. #include <Dialogs.hpp>
  15. #include <ExtCtrls.hpp>
  16. #include "GLBaseClasses.hpp"
  17. #include "GLCoordinates.hpp"
  18. #include "GLCrossPlatform.hpp"
  19. #include "GLMaterial.hpp"
  20. //---------------------------------------------------------------------------
  21. class TForm1 : public TForm
  22. {
  23. __published: // published declarations
  24. TGLSceneViewer *GLSceneViewer1;
  25. TGLScene *GLScene1;
  26. TGLDummyCube *GLDummyCube1;
  27. TGLLightSource *GLLightSource1;
  28. TGLCamera *GLCamera1;
  29. TGLCadencer *GLCadencer1;
  30. TColorDialog *ColorDialog1;
  31. TGLMaterialLibrary *GLMaterialLibrary1;
  32. TPanel *Panel1;
  33. TCheckBox *CBFogEnable;
  34. TLabel *LFogStart;
  35. TEdit *EFogStart;
  36. TLabel *LFogEnd;
  37. TEdit *EFogEnd;
  38. TGroupBox *GBTexture;
  39. TCheckBox *CBTextureEnabled;
  40. TCheckBox *CBTextureIgnoreFog;
  41. TShape *SFogColor;
  42. TLabel *LFogColor;
  43. TCheckBox *CBApplyToBackground;
  44. TLabel *LFogDensity;
  45. TEdit *EFogDensity;
  46. TRadioGroup *RGFogDistance;
  47. TRadioGroup *RGFogMode;
  48. void __fastcall GLSceneViewer1MouseDown(TObject *Sender,
  49. TMouseButton Button, TShiftState Shift, int X, int Y);
  50. void __fastcall GLSceneViewer1MouseMove(TObject *Sender,
  51. TShiftState Shift, int X, int Y);
  52. void __fastcall CBFogEnableClick(TObject *Sender);
  53. void __fastcall EFogStartChange(TObject *Sender);
  54. void __fastcall SFogColorMouseDown(TObject *Sender,
  55. TMouseButton Button, TShiftState Shift, int X, int Y);
  56. void __fastcall RGFogModeClick(TObject *Sender);
  57. void __fastcall CBApplyToBackgroundClick(TObject *Sender);
  58. void __fastcall CBTextureEnabledClick(TObject *Sender);
  59. void __fastcall CBTextureIgnoreFogClick(TObject *Sender);
  60. void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta,
  61. TPoint &MousePos, bool &Handled);
  62. private: // private declarations
  63. void ApplyFogSettings(void);
  64. int mx, my;
  65. public: // public declarations
  66. __fastcall TForm1(TComponent* Owner);
  67. };
  68. //---------------------------------------------------------------------------
  69. extern PACKAGE TForm1 *Form1;
  70. //---------------------------------------------------------------------------
  71. #endif