TgmTriangulationMesh2D

type TgmTriangulationMesh2D = class(TgmTriMesh2D)

protected

  FBBMin: TgmPoint2D;

  FBBMax: TgmPoint2D;

  FMeshMin: TgmPoint2D;

  FMeshMax: TgmPoint2D;

  class function GetTriangleClass; override;

  procedure DoExecutionStep();

  procedure DoPhaseComplete();

  procedure DoStatus();

  procedure ReplaceVertexInBoundaries();

  procedure PrepareMeshConstruction; virtual;

  procedure RemoveMeshConstruction(); virtual;

  procedure DetectRegions; virtual;

  function AddBoundaryToTriangulation();

  function AddVertexToTriangulation(); virtual;

  procedure SplitTriangleBody();

  procedure SplitTriangleEdge();

  function HitTestTriangles();

  function BruteForceHitTestTriangles();

  procedure PostProcessMesh; virtual;

  procedure CheckTriangleWithEdge(); virtual;

  function BuildTriangleFan();

  procedure RemoveTriangleFromMesh();

  procedure ReduceBoundaryChain(); virtual;

  procedure InitializeInfo; override;

  procedure FinalizeInfo; virtual;

public

  constructor Create; override;

  destructor Destroy; override;

  procedure Clear; override;

  procedure AddGraph(); virtual;

  procedure Triangulate();

  property Regions: TgmMeshRegionList; [r]

  property VertexSkipCount: Integer; [r]

  property SplitBodyCount: Integer; [r]

  property SplitEdgeCount: Integer; [r]

  property HitTests: Integer; [r]

  property AreaInitial: Double; [r]

  property CalculationTime: Double; [r]

  property OnExecutionStep: TgmStringEvent; [rw]

  property OnPhaseComplete: TgmStringEvent; [rw]

  property OnStatus: TgmStringEvent; [rw]

end;

TgmTriangulationMesh2D

TgmTriMesh2D

TObject