Gorilla.DefTypes

Fields

• protected FModel : TModelDef
  
• protected FKind : TMaterialDefKind
  
• protected FShadingModel : TGorillaShadingModel
  
• protected FUseTexturing : Boolean
  
• protected FUseTexture0 : Boolean
  
• protected FUseLighting : Boolean
  
• protected FUseVertexColor : Boolean
  
• protected FUseSpecular : Boolean
  
• protected FDiffuse : TAlphaColorF
  
• protected FAmbient : TAlphaColorF
  
• protected FEmissive : TAlphaColorF
  
• protected FSpecular : TAlphaColorF
  
• protected FSpecPow : Single
  
• protected FReflectionColor : TAlphaColorF
  
• protected FReflectionPower : Single
  
• protected FUseReflection : Boolean
  
• protected FRefractionColor : TAlphaColorF
  
• protected FRefractionPower : Single
  
• protected FUseRefraction : Boolean
  
• protected FMetallic : Single
  
• protected FRoughness : Single
  
• protected FAO : Single
  
• protected FUseClipping : Boolean
  
• protected FClipping : TAlphaColorF
  
• protected FUseAlphaCutoff : Boolean
  
• protected FAlphaCutoff : Single
  
• protected FTextures : TTextureDefList
  
• protected FShaders : TShaderDefList
  
• protected FMaterials : TMaterialDefList
  
• protected FUseOpacity : Boolean
  
• protected FOpacity : Single
  
• protected FDoubleSided : Boolean
  

Methods

• public constructor Create  ( const  AModel :  TModelDef; const  AId :  string ) ;
• public destructor Destroy  ( ) ;
• protected function GetModel  ( )  : TModelDef ;
• public function AddTexture  ( const  ATexDef :  TTextureDef )  : TTextureDef ;  overload;
• public function AddTexture  ( const  AChannel :  TColorChannelDef; const  AAsset :  TObject; const  AIsAssetOwner :  Boolean )  : TTextureDef ;  overload;
• public function GetTexture  ( const  AChannel :  TColorChannelDef )  : TTextureDef ;
• public function TextureChannelExists  ( const  AChannel :  TColorChannelDef )  : Boolean ;
• public procedure AddLayeredMaterial  ( const  AMaterial :  TMaterialDef ) ;  virtual;
• public procedure ClearLayeredMaterials  ( ) ;  virtual;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public Model : TModelDef
  read GetModel
  
• public Kind : TMaterialDefKind
  read FKind
  write FKind
  
• public ShadingModel : TGorillaShadingModel
  read FShadingModel
  write FShadingModel
  
• public UseTexturing : Boolean
  read FUseTexturing
  write FUseTexturing
  
• public UseTexture0 : Boolean
  read FUseTexture0
  write FUseTexture0
  
• public UseLighting : Boolean
  read FUseLighting
  write FUseLighting
  
• public UseVertexColor : Boolean
  read FUseVertexColor
  write FUseVertexColor
  
• public UseSpecular : Boolean
  read FUseSpecular
  write FUseSpecular
  
• public Diffuse : TAlphaColorF
  read FDiffuse
  write FDiffuse
  
• public Ambient : TAlphaColorF
  read FAmbient
  write FAmbient
  
• public Emissive : TAlphaColorF
  read FEmissive
  write FEmissive
  
• public Specular : TAlphaColorF
  read FSpecular
  write FSpecular
  
• public SpecPow : Single
  read FSpecPow
  write FSpecPow
  
• public ReflectionColor : TAlphaColorF
  read FReflectionColor
  write FReflectionColor
  
• public ReflectionPower : Single
  read FReflectionPower
  write FReflectionPower
  
• public UseReflection : Boolean
  read FUseReflection
  write FUseReflection
  
• public RefractionColor : TAlphaColorF
  read FRefractionColor
  write FRefractionColor
  
• public RefractionPower : Single
  read FRefractionPower
  write FRefractionPower
  
• public UseRefraction : Boolean
  read FUseRefraction
  write FUseRefraction
  
• public Metallic : Single
  read FMetallic
  write FMetallic
  
• public Roughness : Single
  read FRoughness
  write FRoughness
  
• public AO : Single
  read FAO
  write FAO
  
• public UseClipping : Boolean
  read FUseClipping
  write FUseClipping
  
• public Clipping : TAlphaColorF
  read FClipping
  write FClipping
  
• public UseAlphaCutoff : Boolean
  read FUseAlphaCutoff
  write FUseAlphaCutoff
  
• public AlphaCutoff : Single
  read FAlphaCutoff
  write FAlphaCutoff
  
• public Textures : TObjectList<Gorilla.DefTypes.TTextureDef>
  read FTextures
  
• public Shaders : TObjectList<Gorilla.DefTypes.TShaderDef>
  read FShaders
  
• public Materials : TObjectList<Gorilla.DefTypes.TMaterialDef>
  read FMaterials
  
• public UseOpacity : Boolean

  If UseOpacity is set to TRUE, the mesh with this specific material will be rendered translucent. You can than control transparency by the opacity value.

  read FUseOpacity
  write FUseOpacity
  
• public Opacity : Single
  read FOpacity
  write FOpacity
  
• public DoubleSided : Boolean
  read FDoubleSided
  write FDoubleSided
  

Fields

• protected FKey : Single
  
• protected FInterpolation : TInterpolationType
  
• protected FValue : T
  

Methods

• public constructor Create  ( ) ;
• public constructor Create  ( const  AKey :  Single; const  AValue :  T; const  AInterpolation :  TInterpolationType  =  Linear ) ;
• public function GetSize  ( )  : Int64 ;  virtual;
• public function ToJSON  ( const  ASerializeFunc :  )  : TJSONObject ;  virtual;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject; const  AUnserializeFunc :  ) ;  virtual;

Properties

• public Key : Single
  read FKey
  write FKey
  
• public Interpolation : TInterpolationType
  read FInterpolation
  write FInterpolation
  
• public Value : T
  read FValue
  write FValue
  

Fields

• protected FStage : TAnimationStageDef
  
• protected FDuration : Single
  
• protected FLoop : Boolean
  
• protected FPath : string
  
• protected FKeys : TInterpolatorKeyDefList
  
• protected FSerialize :
  
• protected FUnserialize :
  

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• public destructor Destroy  ( ) ;
• public function AddKey  ( const  AKey :  Single; const  AValue :  T; const  AInterpolation :  TInterpolationType )  :  ;
• public function AddEmptyKey  ( )  :  ;
• public procedure AddKeys  ( const  AKeyTimes :  TFloatDynArray; const  AKeyValues :  ; const  AIntVals :  TAnimationKeyInterpolationDynArray ) ;  virtual;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public procedure NormalizeKeyTimeValues  ( ) ;

  This method normalizes key time-values to a relative time-range between 0.0 - 1.0. It also sets the Duration property to the real animation length. Firemonkey animations will only work correctly with relative / normalized timestamps.

• public function FindKeys  ( ADelta :  Single; out  AKeyStart :  ; out  AKeyStop :  )  : Boolean ;

  Tries to find a start and stop key referred to a submitted delta value (0.0 - 1.0). The method returns FALSE, if no valid keys can be found.

• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  T )  : Boolean ;  abstract virtual;

  You can produce virtual keys by linear interpolation.

Properties

• public Stage : TAnimationStageDef
  read FStage
  
• public Duration : Single

  The duration in seconds.

  read FDuration
  write FDuration
  
• public Loop : Boolean

  Get or set if the interpolator animation should be looped.

  read FLoop
  write FLoop
  
• public Path : string

  Defines the property name path where the animated value will be written to. This property also depends on the interpolator type you are using. It is important to have compatible types.

  read FPath
  write FPath
  
• public Keys : TObjectList<System.TObject>

  Normalized key values. Normalized means, that time values are in range from 0.0 - 1.0 in duration space. While the Duration property holds the length of animation in seconds, the key time-value holds a relative timestamp on that.

  read FKeys
  

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• protected function SerializeValue  ( const  AValue :  TPoint3D )  : TJSONValue ;
• protected function UnserializeValue  ( const  AValue :  TJSONValue )  : TPoint3D ;
• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  TPoint3D )  : Boolean ;  override;

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• protected function SerializeValue  ( const  AValue :  TVector3D )  : TJSONValue ;
• protected function UnserializeValue  ( const  AValue :  TJSONValue )  : TVector3D ;
• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  TVector3D )  : Boolean ;  override;

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• protected function SerializeValue  ( const  AValue :  TQuaternion3D )  : TJSONValue ;
• protected function UnserializeValue  ( const  AValue :  TJSONValue )  : TQuaternion3D ;
• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  TQuaternion3D )  : Boolean ;  override;

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• protected function SerializeValue  ( const  AValue :  TMatrix3D )  : TJSONValue ;
• protected function UnserializeValue  ( const  AValue :  TJSONValue )  : TMatrix3D ;
• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  TMatrix3D )  : Boolean ;  override;

Methods

• public constructor Create  ( const  AStage :  TAnimationStageDef ) ;
• protected function SerializeValue  ( const  AValue :  TPoint3DDynArray )  : TJSONValue ;
• protected function UnserializeValue  ( const  AValue :  TJSONValue )  : TPoint3DDynArray ;
• public function ComputeInterpolatedKey  ( ADelta :  Single; var  AKey :  Single; var  AInterpolation :  TInterpolationType; var  AValue :  TPoint3DDynArray )  : Boolean ;  override;

Fields

• protected FAnimation : TAnimationDef
  
• protected FReference : TCustomDef
  
• protected FInterpolators : TInterpolatorDefList
  
• protected FKeyUnifyFlags : TKeyUnifyFlags
  

Methods

• public constructor Create  ( const  AAnimation :  TAnimationDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure SetReference  ( const  AValue :  TCustomDef ) ;  virtual;
• public procedure AddInterpolator  ( const  AInter :  TCustomDef ) ;  virtual;
• public function FindInterpolatorById  ( const  AName :  string )  : TCustomDef ;  virtual;
• public function GetDurationInSeconds  ( )  : Single ;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public Animation : TAnimationDef
  read FAnimation
  
• public Reference : TCustomDef
  read FReference
  write SetReference
  
• public Interpolators : TObjectList<Gorilla.DefTypes.TCustomDef>
  read FInterpolators
  
• public KeyUnifyFlags : TKeyUnifyFlags
  read FKeyUnifyFlags
  write FKeyUnifyFlags
  

Fields

• protected FMesh : TMeshDef
  
• protected FAnimation : TAnimationDef
  
• protected FIsBuffered : Boolean
  
• protected FFrames : TAnimationBufferFrames
  
• protected FBufferedFrames : Integer
  

Methods

• public constructor Create  ( const  AMesh :  TMeshDef; const  AAnim :  TAnimationDef ) ;
• public destructor Destroy  ( ) ;
• public procedure SetFrameCount  ( const  AFrameCount :  Integer ) ;

  Apply a number of frames to this buffer. If AFrameCount is equal to the current number of frames nothing will change. If the count differs, the method will reinitialize Frames and set to IsBuffered = false

Properties

• public Mesh : TMeshDef
  read FMesh
  
• public Animation : TAnimationDef
  read FAnimation
  
• public Frames : TObjectList<Gorilla.Context.Buffers.TMeshBufferObject>
  read FFrames
  
• public IsBuffered : Boolean
  read FIsBuffered
  write FIsBuffered
  
• public BufferedFrames : Integer
  read FBufferedFrames
  

Fields

• protected FModel : TModelDef
  
• protected FStages : TAnimationStageDefList
  
• protected FCachingFlags : TAnimationCachingFlags
  
• protected FBufferingState : TAnimationBufferingState
  
• protected FBuffers : TAnimationBufferMap
  
• protected FFrameRate : Integer
  
• protected FFrameCount : Integer
  
• protected FDuration : Double
  

Methods

• public constructor Create  ( const  AModel :  TModelDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure DoOnBufferValueNotify  ( ASender :  TObject; const  AItem :  TAnimationBuffer; AAction :  TCollectionNotification ) ;
• protected procedure SetFrameRate  ( AValue :  Integer ) ;
• protected function GetIsCached  ( )  : Boolean ;
• protected function GetIsCacheable  ( )  : Boolean ;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public procedure AddStage  ( const  AStage :  TAnimationStageDef ) ;

  Adds an existing animation stage definition to a specific animation.

• public function FindStageById  ( const  AId :  string )  : TAnimationStageDef ;

  Trys to find an animation stage by its ID and returns those. If a specific stage could not be found, the method returns NIL

• public function GetDurationInSeconds  ( )  : Double ;

  Checks all animations stages and interpolators and returns the max. duration time in seconds.

• public function GetDurationInMilliseconds  ( )  : Int64 ;

  Checks all animations stages and interpolators and returns the max. duration time in milliseconds. This method uses the GetDurationInSeconds() method and converts to ordinal milliseconds (rounding problems may occur).

• public procedure PrepareAnimationData  ( ) ;

  Prepare internal animation data, like framecount and duration

• public function ComputeFrameCount  ( const  ADurationInSeconds :  Double )  : Integer ;  overload;

  Computes the maximum number of frames for this animation.

• public function ComputeFrameCount  ( const  ADurationInMS :  Int64 )  : Integer ;  overload;
• public function ComputeFrameCount  ( )  : Integer ;  overload;
• public procedure UnifyInterpolators  ( AOptions :  TUnifyInterpolatorOptions  =  [] ; ACallback :  TUnifyInterpolatorTransformationProc  =  nil ) ;  virtual;

  To optimize animation performance, this method will summarize singleton position-, scale- and rotation interpolators into a single transformation interpolator represented by a matrices, instead of vector values. This allows to reduce single animation instances to a minimum and increases runtime performance.

• public procedure Cache  ( const  ACache :  TObject ) ;
• public procedure InitializeCaching  ( const  AMesh :  TMeshDef ) ;

  Initializes a TAnimationBuffer instance for each mesh in a supplied mesh.

• public procedure FinalizeCaching  ( ) ;

  Finalizes the caching mechanism and sets the animation definition to Ready.

• public function StartCaching  ( const  AMesh :  TMeshDef )  : TAnimationBuffer ;

  Starts the caching mechanism and returns the used animation buffer. The method returns NIL, if the animation for a specific mesh is already cached. If new caching routine was started, the method will set the buffering state to "Started".

• public procedure CacheFrame  ( const  ABuffer :  TAnimationBuffer; const  AVertices :  TVertexBuffer; const  AIndices :  TIndexBuffer; const  AFlags :  TAnimationCachingFlags ) ;

  Caches a current vertex- and indexbuffer of a specific mesh inside a specific animation buffer. The method will set the buffering state to "Caching". The method will not cache the mesh data if the max. number of frames is reached. In that case the method will set buffering state to "Cached"

• public procedure StopCaching  ( const  ABuffer :  TAnimationBuffer ) ;

  Stops the caching for a specific mesh. The method will set the buffering state to "Ready".

• public function GetNextCacheFrame  ( AMesh :  TMeshDef; AFrame :  Integer )  : TMeshBufferObject ;

  Returns the next cache frame. This is used by the shape renderer, which sets the current buffer inside of the rendering context.

Properties

• public Model : TModelDef
  read FModel
  
• public Stages : TObjectList<Gorilla.DefTypes.TAnimationStageDef>
  read FStages
  
• public Buffers : TDictionary<Gorilla.DefTypes.TMeshDef,Gorilla.DefTypes.TAnimationBuffer>
  read FBuffers
  
• public BufferingState : TAnimationBufferingState
  read FBufferingState
  
• public FrameRate : Integer
  read FFrameRate
  write SetFrameRate
  
• public FrameCount : Integer
  read FFrameCount
  
• public Duration : Double
  read FDuration
  
• public IsCached : Boolean
  read GetIsCached
  
• public IsCacheable : Boolean
  read GetIsCacheable
  
• public CachingFlags : TAnimationCachingFlags
  read FCachingFlags
  

Fields

• protected FOwnerId : string
  
• protected FOwner : TCustomDef
  
• protected FTransform : TMatrix3D
  
• protected FChildren : TTransformDefList
  
• protected FCopyCount : Integer
  

Methods

• public constructor Create  ( AOwner :  TCustomDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure DoSetOwner  ( AValue :  TCustomDef ) ;  virtual;
• protected function GetOwner  ( )  : TTransformDef ;  virtual;
• protected procedure SetOwner  ( const  AValue :  TTransformDef ) ;  virtual;
• public procedure IncCopyCount  ( ) ;
• public function GetQualifiedComponentName  ( )  : string ;  virtual;
• public function GetModel  ( )  : TModelDef ;  virtual;
• public function GetOwnerRef  ( )  : TCustomDef ;  virtual;
• public procedure SetOwnerRef  ( const  AValue :  TCustomDef ) ;  virtual;
• public function AddChild  ( ATransform :  TTransformDef )  : Integer ;  virtual;
• public procedure RemoveChild  ( ATransform :  TTransformDef ) ;  virtual;
• public procedure ClearChildren  ( ) ;  virtual;
• public function FindChildById  ( const  AId :  string; const  AThrowException :  Boolean )  : TTransformDef ;  virtual;
• public procedure Traverse  ( ADeepTraverse :  Boolean; AProc :  TTransformTraverseProc ) ;
• public procedure AddMesh  ( const  AMesh :  TMeshDef ) ;  virtual;
• public function GetAbsoluteTransformation  ( )  : TMatrix3D ;  virtual;
• public function EvaluateGlobalTransformation  ( )  : TMatrix3D ;  virtual;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public Transform : TMatrix3D
  read FTransform
  write FTransform
  
• public Owner : TTransformDef
  read GetOwner
  write SetOwner
  
• public Children : TObjectList<Gorilla.DefTypes.TTransformDef>
  read FChildren
  
• public CopyCount : Integer
  read FCopyCount
  

Fields

• protected FReferenceId : string
  
• protected FReference : TTransformDef
  

Methods

• public constructor Create  ( const  AOwner :  TTransformDef ) ;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public ReferenceId : string

  For late resolving we need this property to store the id of the reference.

  read FReferenceId
  write FReferenceId
  
• public Reference : TTransformDef

  A runtime reference to a resolved node in hierarchy.

  read FReference
  write FReference
  

Fields

• protected FRoot : TJointDef
  
• protected FControllers : TControllerDefList
  
• protected FJointsCount : Integer
  

Methods

• public constructor Create  ( const  AModel :  TModelDef ) ;
• public destructor Destroy  ( ) ;
• public function GetModel  ( )  : TModelDef ;  override;
• public procedure SetModel  ( AValue :  TModelDef ) ;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function LateResolveFromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject )  : Boolean ;  override;
• public function FindJointById  ( const  AId :  string )  : TJointDef ;
• public procedure AddController  ( const  ACtrl :  TControllerDef ) ;
• public function FindControllerByTransform  ( ATransform :  TTransformDef )  : TControllerDef ;

Properties

• public Model : TModelDef
  read GetModel
  write SetModel
  
• public Root : TJointDef
  read FRoot
  write FRoot
  
• public Controllers : TObjectList<Gorilla.DefTypes.TControllerDef>
  read FControllers
  

Fields

• protected FRoot : TJointDef
  
• protected FControllers : TControllerDefList
  
• protected FJointsCount : Integer
  

Methods

• public constructor Create  ( const  AModel :  TModelDef ) ;
• public destructor Destroy  ( ) ;
• public function GetModel  ( )  : TModelDef ;  override;
• public procedure SetModel  ( AValue :  TModelDef ) ;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function LateResolveFromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject )  : Boolean ;  override;
• public function FindJointById  ( const  AId :  string )  : TJointDef ;
• public procedure AddController  ( const  ACtrl :  TControllerDef ) ;
• public function FindControllerByTransform  ( ATransform :  TTransformDef )  : TControllerDef ;

Properties

• public Model : TModelDef
  read GetModel
  write SetModel
  
• public Root : TJointDef
  read FRoot
  write FRoot
  
• public Controllers : TObjectList<Gorilla.DefTypes.TControllerDef>
  read FControllers
  

Fields

• protected FParent : TJointDef
  
• protected FJoints : TJointDefMap
  
• protected FArmatureIndex : Integer
  

Methods

• public constructor Create  ( const  AArmature :  TArmatureDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure SetArmature  ( AValue :  TArmatureDef ) ;
• protected function GetArmatureIndex  ( )  : Integer ;
• protected procedure SetArmatureIndex  ( AValue :  Integer ) ;
• protected function GetHumanoid  ( )  : TArmatureDef ;
• protected procedure SetHumanoid  ( AValue :  TArmatureDef ) ;
• protected function GetHumanoidIndex  ( )  : Integer ;
• protected procedure SetHumanoidIndex  ( AValue :  Integer ) ;
• protected procedure DoOnJointsValueNotify  ( ASender :  TObject; const  AItem :  TJointDef; AAction :  TCollectionNotification ) ;
• public function GetModel  ( )  : TModelDef ;  override;
• public function GetArmature  ( )  : TArmatureDef ;
• public procedure AddJoint  ( const  AJoint :  TJointDef ) ;
• public function FindJointById  ( const  AId :  string )  : TJointDef ;
• public function JointsCount  ( )  : Integer ;
• public function EvaluateGlobalTransformation  ( )  : TMatrix3D ;  override;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  virtual;

Properties

• public Model : TModelDef
  read GetModel
  
• public Armature : TArmatureDef
  read GetArmature
  write SetArmature
  
• public Parent : TJointDef
  read FParent
  write FParent
  
• public Joints : TDictionary<System.string,Gorilla.DefTypes.TJointDef>
  read FJoints
  
• public ArmatureIndex : Integer
  read GetArmatureIndex
  write SetArmatureIndex
  
• public Humanoid : TArmatureDef
  read GetHumanoid
  write SetHumanoid
  
• public HumanoidIndex : Integer
  read GetHumanoidIndex
  write SetHumanoidIndex
  

Fields

• protected FLinkIndex : Integer
  
• protected FIsStandalone : Boolean
  
• protected FJoint : TJointDef
  
• protected FController : TControllerDef
  
• protected FWeights : TFloatDynArray
  
• protected FIndices : TIntegerDynArray
  
• protected FLowerLimit : TFloatDynArray
  
• protected FUpperLimit : TFloatDynArray
  
• protected FInvBindMatrix : TMatrix3D
  
• protected FInvBindMatAvail : Boolean
  

Methods

• public constructor Create  ( const  AJoint :  TJointDef; const  AController :  TControllerDef; const  AIsStandalone :  Boolean ) ;
• public destructor Destroy  ( ) ;
• protected function GetIndex  ( Index :  Integer )  : Integer ;
• protected function GetLowerLimit  ( Index :  Integer )  : Single ;
• protected function GetUpperLimit  ( Index :  Integer )  : Single ;
• protected function GetWeight  ( Index :  Integer )  : Single ;
• protected procedure SetInvBindMatrix  ( AValue :  TMatrix3D ) ;
• protected function GetTarget  ( )  : TTransformDef ;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function IsSkeletonRoot  ( const  ASkin :  TSkinDef )  : Boolean ;
• public procedure ApplyBindPose  ( const  ASkin :  TSkinDef ) ;  virtual;
• public function IsInvBindMatrixAvailable  ( )  : Boolean ;
• public function EvaluateGlobalTransformation  ( )  : TMatrix3D ;
• public procedure ClearWeightsAndIndices  ( ALength :  Integer ) ;
• public procedure AdjustLengthOfWeightsAndIndices  ( ALength :  Integer ) ;

Properties

• public LinkIndex : Integer

  The link index is set on calling LinkJoint() method and is not used for any identification. But it is very useful for lists to find a joint reference very fast.

  read FLinkIndex
  
• public IsStandalone : Boolean
  read FIsStandalone
  
• public Joint : TJointDef
  read FJoint
  
• public Controller : TControllerDef
  read FController
  
• public Target : TTransformDef
  read GetTarget
  
• public Weights : TArray<System.Single>
  read FWeights
  write FWeights
  
• public Indices : TArray<System.Integer>
  read FIndices
  write FIndices
  
• public LowerLimit : TArray<System.Single>
  read FLowerLimit
  write FLowerLimit
  
• public UpperLimit : TArray<System.Single>
  read FUpperLimit
  write FUpperLimit
  
• public InvBindMatrix : TMatrix3D
  read FInvBindMatrix
  write SetInvBindMatrix
  

Fields

• protected FController : TControllerDef
  
• protected FItems : TArray<Gorilla.DefTypes.TVertexJoints>
  

Methods

• public constructor Create  ( AController :  TControllerDef; const  ACapacity :  Integer ) ;
• public destructor Destroy  ( ) ;
• protected function GetItemPtr  ( AIndex :  Integer )  : PVertexJoints ;
• protected function GetItem  ( AIndex :  Integer )  : TVertexJoints ;
• public procedure SetItem  ( const  AIndex :  Integer; const  AValue :  TVertexJoints ) ;
• public procedure Clear  ( ) ;
• public function Count  ( )  : Integer ;

Properties

• public Controller : TControllerDef
  read FController
  
• public ItemsPtr[Index] : PVertexJoints
  read GetItemPtr
  
• public Items[Index] : TVertexJoints
  read GetItem
  

Fields

• protected FLinkedJoints : TJointRefDefList
  
• protected FSkeletons : TJointRefDefList
  
• protected FBindShapeMatrix : TMatrix3D
  
• protected FBindPoses : TMatrix3DDynArray
  

Methods

• public constructor Create  ( AController :  TControllerDef ) ;
• public destructor Destroy  ( ) ;
• protected function GetController  ( )  : TControllerDef ;
• protected procedure SetController  ( AValue :  TControllerDef ) ;
• protected function GetTarget  ( )  : TTransformDef ;
• protected procedure SetTarget  ( AValue :  TTransformDef ) ;
• protected procedure DoOnVertexJointsListValueNotify  ( ASender :  TObject; const  AItem :  TVertexJoints; AAction :  TCollectionNotification ) ;
• public procedure AdjustBindPosesArrayLength  ( AIndex :  Integer ) ;
• public procedure SetBindPosesArrayLength  ( ACount :  Integer ) ;
• public function GenerateVertexJoints  ( const  ABindShapeMatrix :  TMatrix3D; AMeshDef :  TMeshDef  =  nil )  : TVertexJointsList ;
• public procedure ApplyVertexJointsRelation  ( AVertices :  TVertexJointsList ) ;
• public function BindShapeMatrixIsIdentity  ( )  : Boolean ;
• public procedure GetSkeletonJointTransformations  ( var  AJointTransfArr :  TMatrix3DDynArray; const  ATransform :  TMatrix3D ) ;
• public procedure CalculateInverseBindTransformMatrix  ( ABindShapeMatrix :  TMatrix3D ) ;
• public procedure ApplyBindPoses  ( ) ;
• public function LinkJoint  ( const  AJointRef :  TJointRefDef )  : TJointRefDef ;  overload;
• public function LinkJoint  ( const  AJoint :  TJointDef; const  ARefClass :  TJointRefDefClass  =  nil )  : TJointRefDef ;  overload;
• public function GetJointRef  ( const  AId :  string )  : TJointRefDef ;  overload;
• public function GetJointRef  ( const  AJoint :  TJointDef )  : TJointRefDef ;  overload;
• public function GetJointIndex  ( const  AId :  string )  : Integer ;  overload;
• public function GetJointIndex  ( const  AJoint :  TJointDef )  : Integer ;  overload;
• public function LinkedJointsToString  ( )  : string ;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public procedure NormalizeJointVertexWeights  ( AWeightTolerance :  Single  =  0.01 ) ;

  Some dirty file formats out there provide vertex weights unequal to a sum of 1.0. This routine runs over all vertices and their joint linking. sums up weights and if they are unequal to 1.0, it will normalize each value.

• public function CheckMeshVerticesToBeAttachedCorrectly  ( AWeightTolerance :  Single  =  0.1 )  : Integer ;

  Use this method to check, if all mesh vertices are linked to at least joints and der total sum is equal to 1.0, which means correct weighting.

• public procedure DrawJointWeights  ( AJointRef :  TJointRefDef; ABitmap :  TBitmap ) ;
• public procedure SaveJointWeightMaps  ( APath :  string; ASize :  Integer  =  $100 ) ;

  Helper function to create bitmaps for all linked joints in a skin. This method calls DrawJointWeights to render vertex weights of each joint reference in the skin depending on the linked mesh.

Properties

• public Controller : TControllerDef
  read GetController
  write SetController
  
• public Target : TTransformDef
  read GetTarget
  write SetTarget
  
• public LinkedJoints : TObjectList<Gorilla.DefTypes.TJointRefDef>
  read FLinkedJoints
  
• public Skeletons : TObjectList<Gorilla.DefTypes.TJointRefDef>
  read FSkeletons
  
• public BindShapeMatrix : TMatrix3D

  The bind shape matrix describes how to transform skin shape geometry into the right coordinate system for use with the joints.

  read FBindShapeMatrix
  write FBindShapeMatrix
  
• public BindPoses : TArray<System.Math.Vectors.TMatrix3D>

  This source defines the inverse bind matrix for each joint, these are used to bring coordinates being skinned into the same space as each joint.

  read FBindPoses
  

Fields

• protected FIndex : Integer
  
• protected FTarget : TTransformDef
  
• protected FSkin : TSkinDef
  

Methods

• public constructor Create  ( const  ATarget :  TTransformDef ) ;
• public destructor Destroy  ( ) ;
• public function GetJointRef  ( const  AId :  string )  : TJointRefDef ;  overload;
• public function GetJointRef  ( const  AJoint :  TJointDef )  : TJointRefDef ;  overload;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public Index : Integer
  read FIndex
  
• public Target : TTransformDef
  read FTarget
  write FTarget
  
• public Skin : TSkinDef
  read FSkin
  write FSkin
  

Methods

• public procedure AddIndex  ( const  AOriginal :  Word; const  ACurrent :  Word ) ;
• public procedure Assign  ( const  AMap :  TVertexIndexMap ) ;

Fields

• protected FVertexFormat : TVertexFormats
  
• protected FIndexFormat : TIndexFormat
  
• protected FFaceOrientation : TFaceOrientation
  
• protected FIsStatic : Boolean
  
• protected FBuffersLinked : Boolean
  
• protected FBufferObject : TMeshBufferObject
  
• protected FBoundingBoxUpdateNeeded : Boolean
  
• protected FBoundingBox : TBoundingBox
  
• protected FFaceNormals : TPoint3DDynArray
  
• protected FVertexSource : TVertexBuffer
  
• protected FIndexSource : TIndexBuffer
  
• protected FVertexIndexMap : TVertexIndexMap
  
• protected FMaterial : TMaterialRefDef
  

Methods

• public constructor Create  ( AOwner :  TCustomDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure SetMaterial  ( AValue :  TMaterialRefDef ) ;  virtual;
• protected procedure SetIsStatic  ( AValue :  Boolean ) ;  virtual;
• protected function GetIndexSource  ( )  : TIndexBuffer ;  virtual;
• protected function GetVertexSource  ( )  : TVertexBuffer ;  virtual;
• protected procedure CalculateTriNormal  ( var  Av1 :  TVertexData; var  Av2 :  TVertexData; var  Av3 :  TVertexData ) ;
• protected procedure DoAssignVertexMap  ( ASrc :  TVertexIndexMap; ADst :  TVertexIndexMap; const  AOffset :  Integer ) ;
• public procedure BoundingBoxChanged  ( ) ;  virtual;
• public function GetBoundingBox  ( )  : TBoundingBox ;  virtual;

  Computes a local bounding box from all vertices inside of the specific mesh. Sub-Meshes are ignored.

• public procedure SetVertexFormatByVertexData  ( const  AVertex :  PVertexData ) ;
• public procedure CreateVertexSource  ( AFormat :  TVertexFormats ) ;
• public procedure CreateIndexSource  ( AFormat :  TIndexFormat ) ;
• public procedure SetVertices  ( const  AVertices :  TVertexBuffer ) ;  virtual;
• public procedure SetIndices  ( const  AIndices :  TIndexBuffer ) ;  virtual;
• public procedure AddVertices  ( const  AVertices :  TVertexDataDynArray; const  AIndex :  Integer; const  ACount :  Integer ) ;  virtual;
• public procedure AppendVertices  ( const  AVertices :  TVertexDataDynArray; const  AIndex :  Integer; const  ACount :  Integer ) ;  virtual;
• public procedure AddIndices  ( const  AIndices :  TIndexDataDynArray; const  AIndex :  Integer; const  ACount :  Integer; const  AOffset :  Integer  =  $0 ) ;  overload virtual;
• public procedure AddIndices  ( const  ATriangles :  TTriangleIndexDynArray; const  AIndex :  Integer; const  ACount :  Integer; const  AOffset :  Integer  =  $0 ) ;  overload virtual;
• public procedure AppendIndices  ( const  AIndices :  TIndexDataDynArray; const  AIndex :  Integer; const  ACount :  Integer; const  AOffset :  Integer  =  $0 ) ;  overload virtual;
• public procedure AppendIndices  ( const  ATriangles :  TTriangleIndexDynArray; const  AIndex :  Integer; const  ACount :  Integer; const  AOffset :  Integer  =  $0 ) ;  overload virtual;
• public function GetVertexPositions  ( )  : TPoint3DDynArray ;  virtual;
• public procedure AddVertexIndexMap  ( const  AMap :  TVertexIndexMap; const  AOffset :  Integer  =  $0 ) ;  virtual;
• public procedure AppendVertexIndexMap  ( const  AMap :  TVertexIndexMap; const  AOffset :  Integer  =  $0 ) ;  virtual;
• public procedure ApplyTransformation  ( const  AMatrix :  TMatrix3D ) ;  virtual;
• public procedure SetMaterialReference  ( const  AMaterial :  TMaterialDef ) ;  virtual;
• public procedure RefreshMeshBuffer  ( ASync :  Boolean ) ;

  This pushes vertices and indices again to mesh bufferobject without rebuilding the buffer.

• public procedure UpdateMeshBuffer  ( ) ;

  This method destroys a previous buffer, create a new one and pushes vertices and indices to it.

• public procedure LinkMeshBuffer  ( ABufferObject :  TMeshBufferObject; AVertices :  TVertexBuffer; AIndices :  TIndexBuffer ) ;

  To allow mesh buffer linking between different meshdef's, you can use this method the necessary objects.

• public procedure UnlinkMeshBuffer  ( ) ;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;

Properties

• public VertexFormat : TVertexFormats
  read FVertexFormat
  write FVertexFormat
  
• public IndexFormat : TIndexFormat
  read FIndexFormat
  
• public FaceOrientation : TFaceOrientation
  read FFaceOrientation
  write FFaceOrientation
  
• public IsStatic : Boolean
  read FIsStatic
  write SetIsStatic
  
• public BufferObject : TMeshBufferObject

  If there is a buffer object is used for buffering vertices & indices inside the graphics card, this object is available especially used for large models like terrains

  read FBufferObject
  
• public VertexSource : TVertexBuffer

  Vertices buffer object where all vertex data is stored in a structure memory area

  read GetVertexSource
  
• public IndexSource : TIndexBuffer

  Indices buffer object where all indices are stored in a list of integers (uint16 or uint32 - depending on platform settings)

  read GetIndexSource
  
• public VertexIndexMap : TVertexIndexMap

  A map between original import format index and indices of vertex clones this is f.e. necessary when importing faces which will automatically be triangulated for OpenGLES. Therefor the vertices are used multiple times

  read FVertexIndexMap
  
• public Material : TMaterialRefDef

  A possibly used material definition. This is just a reference to this specific material definition. Because in some import formats, like OBJ materials will be loaded afterwards the meshes. Therefor we need an ID for referencing.

  read FMaterial
  write SetMaterial
  

Fields

• protected FBVH : PBVHGeometry
  
• protected FRenderByVertexGroups : Boolean
  

Methods

• public constructor Create  ( AOwner :  TCustomDef ) ;
• public destructor Destroy  ( ) ;
• protected procedure SetIsStatic  ( AValue :  Boolean ) ;  override;
• protected function GetMeshes  ( )  : TTransformDefList ;
• protected function ContainsVertexGroups  ( )  : Boolean ;
• public procedure AddMesh  ( const  AMesh :  TMeshDef ) ;  override;
• public procedure RemoveMesh  ( const  AMesh :  TMeshDef ) ;  virtual;
• public function FindMeshById  ( const  AName :  string; const  AThrowException :  Boolean )  : TMeshDef ;  virtual;
• public procedure ApplyToMeshData  ( const  AData :  TMeshData ) ;  virtual;
• public procedure ApplyFromMeshData  ( const  AData :  TMeshData ) ;  virtual;
• public procedure ApplyToMeshDef  ( const  ADef :  TMeshDef; AOptions :  TCopyVertexOptions  =  [] ) ;  virtual;
• public procedure CalcTextureCoordinates  ( ) ;  overload virtual;
• public procedure CalcTextureCoordinates  ( AStartIdx :  Integer; AStopIdx :  Integer ) ;  overload virtual;
• public procedure CalcTextureCoordinates  ( AVertexBuffer :  TVertexBuffer; ABoundingBox :  TBoundingBox; AStartIdx :  Integer; AStopIdx :  Integer ) ;  overload virtual;
• public procedure CalcFaceNormals  ( const  PropagateFaceNormalsToVertices :  Boolean  =  True ; ASubMeshes :  Boolean  =  True ) ;  virtual;
• public procedure CalcSmoothNormals  ( const  Method :  TMeshDefCalculateNormalMethod; const  WeldEpsilon :  Single  =  0.001 ; ASubMeshes :  Boolean  =  True ) ;  virtual;
• public procedure CalcTangentBinormals  ( ASubMeshes :  Boolean  =  False ) ;  overload virtual;
• public procedure CalcTangentBinormals  ( const  AData :  TMeshData ) ;  overload virtual;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function GetCombinedBoundingBox  ( )  : TBoundingBox ;  virtual;

  Computes a local bounding box from all vertices inside of the specific mesh and all sub-meshes.

• public procedure AcquireBVH  ( ) ;  virtual;

  Create bounding volume hierarchy from current mesh vertices. If the BVH was already created, the method exits. Use UpdateBVH to destroy the an existing BVH and create a new one.

• public procedure UpdateBVH  ( ) ;  virtual;

  Destroys an eventually created BVH and creates a new one.

• public procedure ReleaseBVH  ( ) ;  virtual;

  Destroy a previously created bounding volume hierarchy.

• public function RayCastIntersect  ( const  ARayPos :  TPoint3D; const  ARayDir :  TPoint3D; const  ATransform :  TMatrix3D; var  AIntersection :  TPoint3D; var  ANormal :  TPoint3D )  : Boolean ;  virtual;

  Perform a ray cast on the specific mesh. The method return if ray cast was successful. In that case AIntersection and ANormal return values are set.

• public function GetNormalVectorFromPoints  ( const  A :  TPoint3D; const  B :  TPoint3D; const  C :  TPoint3D )  : TPoint3D ;
• public procedure AddPolygon  ( const  APoly :  TPolygon ) ;  overload virtual;
• public procedure AddPolygon  ( const  APoly :  T3DPolygon ) ;  overload virtual;

  Add a 3D polygon to the current mesh.

• public procedure AddPolygon  ( const  APoly :  TPolygon; const  ATexCoords :  TPolygon; const  ANormals :  T3DPolygon ) ;  overload virtual;

  Add a 2D polyon to the current mesh.

• public procedure AddPolygon  ( const  APoly :  T3DPolygon; const  ATexCoords :  TPolygon; const  ANormals :  T3DPolygon ) ;  overload virtual;

  Add a 3D polygon to the current mesh.

• public procedure ApplyTransformationMatrixToVertices  ( ATransform :  TMatrix3D; const  AModfiyVertices :  Boolean ) ;  virtual;

  A user helper function to apply the transformation matrix of meshes to vertices. If second parameter AModfiyVertices is set to TRUE, transformation matrices will be applied directly to all vertices, instead of applying the transformation during rendering. matrix.

• public procedure MoveVerticesToPivot  ( ) ;  virtual;

  The method modifies all vertices to move them relatively to the center of the model. The methods takes usage of ApplyTransformationMatrixToVertices() and replaces dynamic transformation matrices.

Properties

• public Model : TModelDef
  read GetModel
  
• public Meshes : TObjectList<Gorilla.DefTypes.TTransformDef>

  A helper property for requesting the children list.

  read GetMeshes
  
• public BVH : PBVHGeometry

  If a bounding volume hierarchy was acquired by calling AcquireBVH(), you will get the structure by this property. Otherwise it will return NIL.

  read FBVH
  
• public RenderByVertexGroups : Boolean
  read FRenderByVertexGroups
  write FRenderByVertexGroups
  

Methods

• public constructor Create  ( AOwner :  TCustomDef ) ;
• public destructor Destroy  ( ) ;
• protected function GetVertexSource  ( )  : TVertexBuffer ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public procedure ApplyToMeshData  ( const  AData :  TMeshData ) ;  override;

  For vertex groups we do not modify the vertices, because they are only a reference to the parent mesh vertices. So we need some special treatment here.

Fields

• protected FLightType : TLightType
  
• protected FDirection : TPoint3D
  
• protected FDiffuse : TAlphaColorF
  
• protected FAmbient : TAlphaColorF
  
• protected FSpecular : TAlphaColorF
  
• protected FIntensity : Single
  
• protected FConstantAttenuation : Single
  
• protected FLinearAttenuation : Single
  
• protected FQuadraticAttenuation : Single
  
• protected FScatteringIntensity : Single
  
• protected FScatteringExposure : Single
  
• protected FScatteringDecay : Single
  
• protected FScatteringDensity : Single
  
• protected FSpotCutOff : Single
  
• protected FSpotExponent : Single
  

Methods

• public constructor Create  ( const  AOwner :  TTransformDef ) ;
• public destructor Destroy  ( ) ;
• public function GetQualifiedComponentName  ( )  : string ;  override;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function LateResolveFromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject )  : Boolean ;  override;

Properties

• public Owner : TCustomDef
  read FOwner
  
• public Model : TModelDef
  read GetModel
  
• public LightType : TLightType
  read FLightType
  write FLightType
  
• public Direction : TPoint3D
  read FDirection
  write FDirection
  
• public Diffuse : TAlphaColorF
  read FDiffuse
  write FDiffuse
  
• public Ambient : TAlphaColorF
  read FAmbient
  write FAmbient
  
• public Specular : TAlphaColorF
  read FSpecular
  write FSpecular
  
• public Intensity : Single
  read FIntensity
  write FIntensity
  
• public ConstantAttenuation : Single
  read FConstantAttenuation
  write FConstantAttenuation
  
• public LinearAttenuation : Single
  read FLinearAttenuation
  write FLinearAttenuation
  
• public QuadraticAttenuation : Single
  read FQuadraticAttenuation
  write FQuadraticAttenuation
  
• public ScatteringIntensity : Single
  read FScatteringIntensity
  write FScatteringIntensity
  
• public ScatteringExposure : Single
  read FScatteringExposure
  write FScatteringExposure
  
• public ScatteringDecay : Single
  read FScatteringDecay
  write FScatteringDecay
  
• public ScatteringDensity : Single
  read FScatteringDensity
  write FScatteringDensity
  
• public SpotCutOff : Single
  read FSpotCutOff
  write FSpotCutOff
  
• public SpotExponent : Single
  read FSpotExponent
  write FSpotExponent
  

Fields

• protected FType : TCameraType
  
• protected FTarget : string
  
• protected FFOV : Single
  
• protected FAspectRatio : Single
  
• protected FNearPlane : Single
  
• protected FFarPlane : Single
  

Methods

• public constructor Create  ( const  AOwner :  TTransformDef ) ;
• public destructor Destroy  ( ) ;
• public function GetQualifiedComponentName  ( )  : string ;  override;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject ) ;  override;
• public function LateResolveFromJSON  ( const  AModel :  TModelDef; const  AValue :  TJSONObject )  : Boolean ;  override;

Properties

• public Owner : TCustomDef
  read FOwner
  
• public Model : TModelDef
  read GetModel
  
• public _Type : TCameraType
  read FType
  write FType
  
• public Target : string
  read FTarget
  write FTarget
  
• public FOV : Single
  read FFOV
  write FFOV
  
• public AspectRatio : Single
  read FAspectRatio
  write FAspectRatio
  
• public NearPlane : Single
  read FNearPlane
  write FNearPlane
  
• public FarPlane : Single
  read FFarPlane
  write FFarPlane
  

Fields

• private FLateResolveList : TDictionary<Gorilla.DefTypes.TCustomDef,System.JSON.TJSONObject>
  
• protected FPackage : TObject
  
• protected FAsset : TObject
  
• protected FIsStandalone : Boolean
  
• protected FFilename : string
  
• protected FTextureAssets : TInterpolatorKeyDefList
  
• protected FMaterials : TMaterialDefMap
  
• protected FLights : TLightDefList
  
• protected FCameras : TCameraDefList
  
• protected FArmatures : TArmatureDefList
  
• protected FControllers : TControllerDefList
  
• protected FAnimations : TAnimationDefList
  
• protected FCurrentAnimation : TAnimationDef
  
• protected FMetaData : TModelMetaDef
  

Methods

• public constructor Create  ( const  AOwner :  TMeshDef; const  APackage :  TObject ) ;
• public destructor Destroy  ( ) ;
• protected procedure DoOnMaterialNotify  ( ASender :  TObject; const  AItem :  TMaterialDef; AAction :  TCollectionNotification ) ;
• protected procedure DoOnJointNotify  ( ASender :  TObject; const  AItem :  TJointDef; AAction :  TCollectionNotification ) ;
• protected function GetArmatureDefList  ( )  : TArmatureDefList ;
• protected function GetHumanoidDefList  ( )  : TArmatureDefList ;
• public procedure CalcFaceNormals  ( const  PropagateFaceNormalsToVertices :  Boolean  =  True ) ;  virtual;
• public procedure CalcSmoothNormals  ( const  Method :  TMeshDefCalculateNormalMethod; const  WeldEpsilon :  Single  =  0.001 ) ;  virtual;
• public procedure CalcTangentBinormals  ( ) ;  virtual;
• public function TryGetTextureAsset  ( const  AAsset :  TObject )  : TObject ;
• public function TextureAssetExists  ( const  AAsset :  TObject )  : Boolean ;
• public procedure RegisterTextureAsset  ( const  AAsset :  TObject ) ;
• public procedure ClearTextureAssets  ( ) ;
• public procedure AddMaterial  ( const  AId :  string; AMaterial :  TMaterialDef ) ;
• public function GetMaterial  ( const  AId :  string )  : TMaterialDef ;
• public function FindMaterialById  ( const  AId :  string )  : TMaterialDef ;
• public procedure AddLight  ( ALight :  TLightDef ) ;
• public function GetLight  ( AIndex :  Integer )  : TLightDef ;
• public function FindLightById  ( const  AId :  string )  : TLightDef ;
• public procedure AddCamera  ( ACamera :  TCameraDef ) ;
• public function GetCamera  ( AIndex :  Integer )  : TCameraDef ;
• public function FindCameraById  ( const  AId :  string )  : TCameraDef ;
• public procedure AddController  ( const  AController :  TControllerDef ) ;
• public procedure AddArmature  ( const  AArmature :  TArmatureDef ) ;
• public function GetArmatureBySkeleton  ( const  ASkeletonJoint :  TJointDef )  : TArmatureDef ;
• public function FindArmatureById  ( const  AId :  string )  : TArmatureDef ;
• public procedure AddHumanoid  ( const  AHumanoid :  TArmatureDef ) ;
• public function GetHumanoidBySkeleton  ( const  ASkeletonJoint :  TJointDef )  : TArmatureDef ;
• public function FindHumanoidById  ( const  AId :  string )  : TArmatureDef ;
• public procedure AddAnimation  ( const  AAnimation :  TAnimationDef ) ;
• public function AddEmptyAnimation  ( const  AId :  string )  : TAnimationDef ;
• public procedure CacheAnimations  ( const  ASelected :  array of TVarRec; const  AFlags :  TAnimationCachingFlags  =  [] ; const  AModel :  TComponent  =  nil ) ;
• public function FindControllerById  ( const  AName :  string; const  AThrowException :  Boolean  =  True )  : TControllerDef ;  virtual;
• public function FindControllerByTransform  ( const  ATransform :  TTransformDef; const  AThrowException :  Boolean  =  True )  : TControllerDef ;  virtual;
• public function FindJointById  ( const  AName :  string )  : TJointDef ;  virtual;
• public function FindAnimationById  ( const  AName :  string )  : TAnimationDef ;  virtual;
• public function FindDefById  ( const  AId :  string )  : TCustomDef ;  virtual;
• public function GetSize  ( )  : Int64 ;  override;
• public function ToJSON  ( )  : TJSONObject ;  override;
• public procedure FromJSON  ( const  AValue :  TJSONObject ) ;  virtual;
• public procedure RequestBitmapCache  ( ACache :  TGorillaBitmapCache ) ;

  It will collect all bitmaps from TMaterialDef instances and add their bitmap data as references to the cache.

• public procedure ApplyBitmapCache  ( ACache :  TGorillaBitmapCache ) ;

  The method will create a STANDALONE(!) texture asset for each bitmap cached. This means the texture asset has no reference to any assets package/group. Call this routine when loading model data from binary storage with a bitmap cache in DFM.

Properties

• public Package : TObject
  read FPackage
  write FPackage
  
• public Asset : TObject
  read FAsset
  write FAsset
  
• public IsStandalone : Boolean
  read FIsStandalone
  write FIsStandalone
  
• public Filename : string
  read FFilename
  write FFilename
  
• public Materials : TDictionary<System.string,Gorilla.DefTypes.TMaterialDef>
  read FMaterials
  
• public Lights : TObjectList<Gorilla.DefTypes.TLightDef>
  read FLights
  
• public Cameras : TObjectList<Gorilla.DefTypes.TCameraDef>
  read FCameras
  
• public Armatures : TObjectList<Gorilla.DefTypes.TArmatureDef>
  read GetArmatureDefList
  
• public Humanoids : TObjectList<Gorilla.DefTypes.TArmatureDef>
  read GetHumanoidDefList
  
• public Controllers : TObjectList<Gorilla.DefTypes.TControllerDef>
  read FControllers
  
• public Animations : TObjectList<Gorilla.DefTypes.TAnimationDef>
  read FAnimations
  
• public CurrentAnimation : TAnimationDef
  read FCurrentAnimation
  write FCurrentAnimation
  
• public MetaData : TModelMetaDef
  read FMetaData
  

Fields

• protected FDestroyed : Boolean
  
• protected FPositionSource : TList<System.Math.Vectors.TPoint3D>
  
• protected FNormalSource : TList<System.Math.Vectors.TPoint3D>
  
• protected FBiNormalSource : TList<System.Math.Vectors.TPoint3D>
  
• protected FTangentSource : TList<System.Math.Vectors.TPoint3D>
  
• protected FTextureSource :
  
• protected FColorSource :
  
• protected FIndexMap : TVertexIndexMap
  
• protected FVertexMap : TCachedVertexMap
  
• protected FVertexHashes : TCachedVertexHashes
  
• protected FVertices : TVertexDataList
  
• protected FIndices : TList<Gorilla.DefTypes.TTriangleIndex>
  
• protected FUseBuffersAsArray : Boolean
  

Methods

• public constructor Create  ( ) ;
• public destructor Destroy  ( ) ;
• protected function GetTextureSourceArray  ( AIndex :  Integer )  : TList<System.Types.TPointF> ;
• protected function GetColorSourceArray  ( AIndex :  Integer )  : TList<System.UITypes.TAlphaColorF> ;
• public procedure ClearAll  ( ) ;  virtual;
• public procedure ClearMaps  ( ) ;  virtual;
• public procedure ClearVirtualData  ( ) ;  virtual;
• public procedure DoOnCreateSubMesh  ( AMesh :  TMeshDef; ASubMesh :  TMeshDef ) ;  virtual;
• public function DoOnCreateDefaultMaterial  ( AMesh :  TMeshDef )  : TMaterialDef ;  virtual;
• public function DoOnCreateMaterialRef  ( AMesh :  TMeshDef; AMaterial :  TMaterialDef )  : TMaterialRefDef ;  virtual;
• public function GetVertex  ( const  AVertex :  TVertexID )  : TVertexData ;

  Fills up VertexData record based on PositionSource, NormalSource, ... by submitted VertexID values

• public function AddTriangle  ( const  AIndexOffset :  Integer; const  ATriangle :  TTriangleID; const  AVertices :  TVertexDataList; const  AIndices :  TList<Gorilla.DefTypes.TTriangleIndex>; const  AVertexOrder :  TVertexOrder  =  CCW )  : Integer ;

  Adds triangle vertices and indices to AVertices and AIndices based on the index values inside of TTriangleID VertexData values are taken from Cache.PositionSource and so on...

• public function AddPolygon  ( const  AIndexOffset :  Integer; const  APolygon :  TPolygonID; const  AVertices :  TVertexDataList; const  AIndices :  TList<Gorilla.DefTypes.TTriangleIndex>; const  AVertexOrder :  TVertexOrder  =  CCW )  : Integer ;

  Adds polygon vertices and indices to AVertices and AIndices based on the index values inside of TPolygonID VertexData values are taken from Cache.PositionSource and so on... CAUTION: this method triangulates the polygon automatically! f.e. a face-poly will produce two triangles

• public procedure SetPositionSource  ( const  ASource :  TSingleDynArray ) ;
• public procedure SetNormalSource  ( const  ASource :  TSingleDynArray ) ;  overload;
• public procedure SetNormalSource  ( const  ASource :  TSingleDynArray; ATransform :  TMatrix3D ) ;  overload;
• public procedure SetTextureSource  ( AIndex :  Integer; const  ASource :  TSingleDynArray; const  AConvertToUV :  Boolean; AStride :  Integer  =  $2 ) ;
• public procedure SetBiNormalSource  ( const  ASource :  TSingleDynArray ) ;
• public procedure SetTangentSource  ( const  ASource :  TSingleDynArray ) ;
• public procedure SetColorSource  ( AIndex :  Integer; const  ASource :  TSingleDynArray ) ;
• public function AddPositionSource  ( const  ASource :  TSingleDynArray )  : Integer ;  overload;
• public function AddPositionSource  ( const  ASource :  TPoint3D )  : Integer ;  overload;
• public function AddNormalSource  ( const  ASource :  TSingleDynArray )  : Integer ;  overload;
• public function AddNormalSource  ( const  ASource :  TPoint3D )  : Integer ;  overload;
• public function AddBinormalSource  ( const  ASource :  TSingleDynArray )  : Integer ;  overload;
• public function AddBinormalSource  ( const  ASource :  TPoint3D )  : Integer ;  overload;
• public function AddTangentSource  ( const  ASource :  TSingleDynArray )  : Integer ;  overload;
• public function AddTangentSource  ( const  ASource :  TVector3DDynArray )  : Integer ;  overload;
• public function AddTangentSource  ( const  ASource :  TPoint3D )  : Integer ;  overload;
• public function AddTextureSource  ( AIndex :  Integer; const  ASource :  TSingleDynArray; const  AConvertToUV :  Boolean )  : Integer ;  overload;
• public function AddTextureSource  ( AIndex :  Integer; const  ASource :  TPointF; const  AConvertToUV :  Boolean )  : Integer ;  overload;
• public function AddColorSource  ( AIndex :  Integer; const  ASource :  TSingleDynArray )  : Integer ;  overload;
• public function AddColorSource  ( AIndex :  Integer; const  ASource :  TAlphaColorF )  : Integer ;  overload;

Properties

• public Destroyed : Boolean
  read FDestroyed
  
• public UseBuffersAsArray : Boolean
  read FUseBuffersAsArray
  write FUseBuffersAsArray
  
• public PositionSource : TList<System.Math.Vectors.TPoint3D>
  read FPositionSource
  
• public NormalSource : TList<System.Math.Vectors.TPoint3D>
  read FNormalSource
  
• public BinormalSource : TList<System.Math.Vectors.TPoint3D>
  read FBiNormalSource
  
• public TangentSource : TList<System.Math.Vectors.TPoint3D>
  read FTangentSource
  
• public TextureSource[Index] : :1
  read GetTextureSourceArray
  
• public ColorSource[Index] : :1
  read GetColorSourceArray
  
• public IndexMap : TVertexIndexMap
  read FIndexMap
  
• public Vertices : TList<Gorilla.DefTypes.TVertexData>
  read FVertices
  
• public Indices : TList<Gorilla.DefTypes.TTriangleIndex>
  read FIndices