//--------------------------------------------------------------------------- #ifndef fIntensityMeshCH #define fIntensityMeshCH //--------------------------------------------------------------------------- #include #include //--------------------------------------------------------------------------- #include #include #include #include #include #include #include #include "GLS.Scene.hpp" #include "GLS.VectorFileObjects.hpp" #include "GLS.SceneViewer.hpp" #include "GLS.Objects.hpp" #include "GLS.BaseClasses.hpp" #include "GLS.BitmapFont.hpp" #include "GLS.Coordinates.hpp" #include "GLS.HUDObjects.hpp" #include "GLS.Material.hpp" #include "GLS.WindowsFont.hpp" #include "GLS.RenderContextInfo.hpp" #include "GLS.Graphics.hpp" #include "GLS.State.hpp" #include "GLS.TextureFormat.hpp" #include "GLSL.UserShader.hpp" //--------------------------------------------------------------------------- typedef // Structures used in our binary file // The structure is quite simplified here, original data came from a FEM // package and was in (huge) text files, and parsing text files is not the // purpose of this demo, so data was simplified ;) struct TDataNode { float X; float Y; float Z; float Intensity; } * DataNodes; struct TDataPrimitive { Word Node1; Word Node2; Word Node3; Word Node4; // if Node4 is OxFFFF, codes a triangle } * DataPrimitives; //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TGLSceneViewer *GLSceneViewer1; TPanel *Panel1; TLabel *Label1; TCheckBox *CBWireFrame; TCheckBox *CBSmooth; TTrackBar *TBScale; TGLScene *GLScene1; TGLFreeForm *GLFreeForm; TGLDummyCube *DCTarget; TGLCamera *GLCamera; TGLHUDSprite *HSPalette; TGLHUDText *HTPaletteLeft; TGLHUDText *HTPaletteRight; TGLMaterialLibrary *GLMaterialLibrary1; TGLUserShader *GLUserShader; TGLWindowsBitmapFont *GLWindowsBitmapFont; void __fastcall FormCreate(TObject *Sender); void __fastcall TBScaleChange(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); private: // User declarations int mx, my; public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif