IBGRAPart3D

type IBGRAPart3D = interface

  procedure Clear();

  function Add();

  function AddNormal();

  function GetTotalNormalCount;

  function IndexOf();

  procedure RemoveVertex();

  procedure RemoveNormal();

  function GetBoundingBox;

  function GetMatrix;

  function GetPart();

  function GetPartCount;

  function GetRadius;

  function GetVertex();

  function GetVertexCount;

  function GetNormal();

  function GetNormalCount;

  function GetTotalVertexCount;

  function GetContainer;

  procedure ResetTransform;

  procedure Scale();

  procedure SetMatrix();

  procedure SetNormal();

  procedure SetVertex();

  procedure Translate();

  procedure RotateXDeg();

  procedure RotateYDeg();

  procedure RotateZDeg();

  procedure RotateXRad();

  procedure RotateYRad();

  procedure RotateZRad();

  procedure ComputeWithMatrix();

  function ComputeCoordinate();

  procedure NormalizeViewNormal;

  procedure LookAt();

  procedure RemoveUnusedVertices;

  function CreatePart;

  procedure ForEachVertex();

  property VertexCount: Integer; [r]

  property NormalCount: Integer; [r]

  property Vertex []: IBGRAVertex3D; [rw]

  property Normal []: IBGRANormal3D; [rw]

  property Matrix: TMatrix3D; [rw]

  property PartCount: Integer; [r]

  property Part []: IBGRAPart3D; [r]

  property Radius: single; [r]

  property BoundingBox: TBox3D; [r]

  property TotalVertexCount: Integer; [r]

  property TotalNormalCount: Integer; [r]

  property Container: IBGRAPart3D; [r]

end;

IBGRAPart3D

IInterface