/
DmitryBar
/
computer_modeling
Обзор
Документация
Войти
/
DmitryBar
/
computer_modeling
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Lab1/source/fStarbox.h
141 строка
4 KB
Dmitry
Выполнение первой лабораторной работы
17 окт 2024, 13:08
17 окт 2024, 13:08
569e597
Код
Авторство
О чём код?
// --------------------------------------------------------------------------- #ifndef fStarboxH #define fStarboxH // --------------------------------------------------------------------------- #include <Classes.hpp> #include <Vcl.Controls.hpp> #include <Vcl.StdCtrls.hpp> #include <Vcl.Forms.hpp> #include <Vcl.ExtCtrls.hpp> #include <Vcl.ComCtrls.hpp> #include <Vcl.Samples.Spin.hpp> #include <Vcl.Menus.hpp> #include <System.ImageList.hpp> #include <Vcl.BaseImageCollection.hpp> #include <Vcl.ImageCollection.hpp> #include <Vcl.ImgList.hpp> #include <Vcl.VirtualImageList.hpp> #include <Vcl.NumberBox.hpp> #include "GLS.Scene.hpp" #include "GLS.SceneViewer.hpp" #include "GLS.Objects.hpp" #include "GLScene.VectorTypes.hpp" #include "GLS.Cadencer.hpp" #include "GLS.Material.hpp" #include "GLS.SimpleNavigation.hpp" #include "fProjections.h" #include "fStarLife.h" #include "fAbout.h" #include "GLScene.BaseClasses.hpp" #include "GLScene.Coordinates.hpp" // --------------------------------------------------------------------------- class TFormBox : public TForm { __published: // IDE-managed Components TGLScene *GLScene; TGLSceneViewer *GLSceneViewer; TGLLightSource *LightSource; TGLCamera *Camera; TGLDummyCube *dcStarbox; TPanel *PanelRight; TSplitter *Splitter1; TButton *ButtonStars; TGLSimpleNavigation *GLSimpleNavigation; TGLCadencer *GLCadencer; TGLMaterialLibrary *MatLibColors; TGroupBox *gbStars; TCheckBox *chbO; TCheckBox *chbB; TCheckBox *chbA; TCheckBox *chbF; TCheckBox *chbG; TCheckBox *chbK; TCheckBox *chbM; TSpinEdit *SpinEdit; TCheckBox *chbAll; TShape *shO; TShape *shB; TShape *shA; TShape *shG; TShape *shK; TShape *shF; TShape *shM; TMainMenu *MainMenu; TMenuItem *miView; TMenuItem *miStarLife; TMenuItem *miProjections; TMenuItem *Hide1; TMenuItem *N1; TMenuItem *miFile; TMenuItem *miNew; TMenuItem *miOpen; TMenuItem *miSave; TMenuItem *miSaveAs; TMenuItem *miExit; TMenuItem *N2; TMenuItem *miHelp; TMenuItem *miAbout; TPanel *PanelLeft; TTreeView *TreeView; TMenuItem *miContent; TMenuItem *N3; TMenuItem *miTools; TMenuItem *miSettings; TMenuItem *miHide; TMenuItem *miShow; TMenuItem *N4; TCheckBox *chbSmoothStars; TVirtualImageList *VirtualImageList; TImageCollection *ImageCollection; TCheckBox *chbOnClasses; TButton *ButtonClear; TNumberBox *nbO; TNumberBox *nbB; TNumberBox *nbA; TNumberBox *nbF; TNumberBox *nbG; TNumberBox *nbK; TNumberBox *nbM; TNumberBox *nbAn; TNumberBox *nbMn; TNumberBox *nbKn; TNumberBox *nbGn; TNumberBox *nbFn; TNumberBox *nbBn; TNumberBox *nbOn; TLabel *Label1; TLabel *Label2; void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta, TPoint &MousePos, bool &Handled); void __fastcall ButtonStarsClick(TObject *Sender); void __fastcall GLSceneViewerMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y); void __fastcall FormCreate(TObject *Sender); void __fastcall chbAllClick(TObject *Sender); void __fastcall FormShow(TObject *Sender); void __fastcall chbOClick(TObject *Sender); void __fastcall miStarLifeClick(TObject *Sender); void __fastcall miProjectionsClick(TObject *Sender); void __fastcall miAboutClick(TObject *Sender); void __fastcall ButtonClearClick(TObject *Sender); void __fastcall SpinEditChange(TObject *Sender); void __fastcall miOpenClick(TObject *Sender); private: // User declarations TGLPoints *Stars[10000]; void MakeStars(TObject *Sender); int mx, my; public: // User declarations __fastcall TFormBox(TComponent* Owner); }; // --------------------------------------------------------------------------- extern PACKAGE TFormBox *FormBox; // --------------------------------------------------------------------------- #endif