T3DModel

type T3DModel = class

  bCount: Integer;

  va: array of TVector;

  na: array of TVector;

  ta: array of TVector2f;

  mat: array of TMaterial;

  grp: array of TFaceGroup;

  bone: array of TBone;

  UseMaterials: Boolean;

  UseColors: Boolean;

public

  property groups: Integer; [rw]

  property mCount: Integer; [rw]

  property vCount: LongInt; [rw]

  procedure Center();

  procedure Clear;

  procedure CombineGroups();

  function GetRadius();

  function GetRadiusX;

  function GetRadiusY;

  function GetRadiusZ;

  procedure Rotate();

  procedure RotateUV(); overload;

  procedure Scale();

  procedure ScaleTo();

  procedure ScaleUV(); overload;

  procedure Translate();

  procedure TranslateUV(); overload;

end;

T3DModel

TObject