GLScene/Source/GLS.Polyhedra.pas

//
// The graphics engine GLScene
//
unit GLS.Polyhedra;

(*
  Polyhedra support.
  The polyhedra are subclasses of polygon structures.
  The registered classes are:
    [TGLPolyTet, TGLPolyOct, TGLPolyHec, TGLPolyIso, TGLPolyDod, TGLPolyhedron, TGLPolyhedra]
*)

interface

{$I Stage.Defines.inc}

uses
  Winapi.OpenGL,
  Winapi.OpenGLext,
  System.Classes,
  System.SysUtils,
  System.Types,
  System.Math,
  VCL.Consts,

  Stage.OpenGLTokens,
  Stage.VectorTypes,
  Stage.VectorTypesExt,
  Stage.TextureFormat,

  Stage.VectorGeometry,
  GLS.Scene,
  GLS.BaseClasses,
  GLS.Objects,
  GLS.GeomObjects,
  GLS.Portal,
  GLS.VectorLists,
  GLS.PersistentClasses,
  GLS.Silhouette,
  Stage.Strings,
  GLS.Texture,
  GLS.Material,
  GLS.Mesh,
  Stage.Logger,
  GLS.Octree,
  GLS.GeometryBB,
  GLS.ApplicationFileIO,
  GLS.Context,
  GLS.Color;


type

  (*
  A PolyTet object that handles polygyns for tetrahedron
  *)
  TGLPolyTet = class(TGLPolygon)
  public
    constructor CreateOwned(AOwner: TGLPolygon);
    destructor Destroy; override;
  end;


implementation


{ TGLPolyTet }

constructor TGLPolyTet.CreateOwned(AOwner: TGLPolygon);
begin
 //
end;

destructor TGLPolyTet.Destroy;
begin
  //
  inherited;
end;

end.