/
Andrusenko_Alexei
/
O3dM
Обзор
Документация
Войти
/
Andrusenko_Alexei
/
O3dM
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Lab2_ViewPoints/fLab2.h
62 строки
2 KB
Andrusenko Alexei
Update ProjectGroup
11 ноя 2024, 21:27
11 ноя 2024, 21:27
e88bb4a
Код
Авторство
О чём код?
//--------------------------------------------------------------------------- #ifndef fLab2H #define fLab2H #define dead_time 5 #define N 7 //--------------------------------------------------------------------------- #include <System.Classes.hpp> #include <Vcl.Controls.hpp> #include <Vcl.StdCtrls.hpp> #include <Vcl.Forms.hpp> #include "GLS.BaseClasses.hpp" #include "GLS.Cadencer.hpp" #include "GLS.Coordinates.hpp" #include "GLS.Objects.hpp" #include "GLS.Scene.hpp" #include "GLS.SceneViewer.hpp" #include <cmath> //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TGLScene *GLScene1; TGLSceneViewer *GLSceneViewer1; TGLCadencer *GLCadencer1; TGLCamera *GLCamera1; TGLLightSource *GLLightSource1; TGLDummyCube *GLDummyCube1; TGLSphere *GLSphere1; TButton *Button1; TButton *Button2; TCheckBox *CheckBox1; TCheckBox *CheckBox2; void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall CheckBox1Click(TObject *Sender); void __fastcall GLSceneViewer1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall GLSceneViewer1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y); void __fastcall GLSceneViewer1MouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta, TPoint &MousePos, bool &Handled); void __fastcall GLCadencer1Progress(TObject *Sender, const double DeltaTime, const double NewTime); void __fastcall CheckBox2Click(TObject *Sender); void __fastcall initial_time(); void __fastcall update_points(); private: // User declarations; int mx, my; int cur_time[N]; int mas_time[N]; bool mas_flag[N]; public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif