Class TSceneObject (unit GLScene) |
Inherits from
TComponent
CONSTRUCTOR Create(AOwner: TComponent);
- ------------------ TSceneObject ----------------------------------------------
PROCEDURE BuildList;
DESTRUCTOR Destroy;
------------------------------------------------------------------------------
PROCEDURE DestroyList;
------------------------------------------------------------------------------
PROCEDURE FinishList;
------------------------------------------------------------------------------
PROCEDURE MoveTo(NewParent: TComposite);
------------------------------------------------------------------------------
PROCEDURE PrepareList;
------------------------------------------------------------------------------
PROCEDURE Rotate(Rx,Ry,Rz : GLFloat);
------------------------------------------------------------------------------
PROCEDURE Scale(Sx,Sy,Sz : GLFloat);
------------------------------------------------------------------------------
PROCEDURE Translate(Tx,Ty,Tz : GLFloat);
------------------------------------------------------------------------------
FUNCTION GetParentComponent: TComponent;
------------------------------------------------------------------------------
FUNCTION HasParent: Boolean;
------------------------------------------------------------------------------
PROCEDURE SetName(CONST NewName: TComponentName);
------------------------------------------------------------------------------
PROCEDURE SetParentComponent(Value: TComponent);
------------------------------------------------------------------------------
FUNCTION GetHandle: TObjectHandle;
------------------------------------------------------------------------------
FUNCTION GetIndex: Integer;
------------------------------------------------------------------------------
PROCEDURE SetAmbient(AValue: TGLColor);
------------------------------------------------------------------------------
PROCEDURE SetChanged(AValue: Boolean);
------------------------------------------------------------------------------
PROCEDURE SetCSGGroup(AGroup: TCSGGroup);
------------------------------------------------------------------------------
PROCEDURE SetDiffuse(AValue: TGLColor);
------------------------------------------------------------------------------
PROCEDURE SetIndex(AValue: Integer);
------------------------------------------------------------------------------
PROCEDURE SetPosition(APosition: TGLCoordinates);
------------------------------------------------------------------------------
PROCEDURE SetPositionW(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionX(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionY(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionZ(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationX(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationY(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationZ(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetShininess(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetSpecular(AValue: TGLColor);
------------------------------------------------------------------------------
property Ambient : TGLColor
property BoundingBox : TBoundingBox
property Changed : Boolean
property CSGGroup : TCSGGroup
property Diffuse : TGLColor
property Handle : TObjectHandle
property Index : Integer
property Parent : TComposite
property Position : TGLCoordinates
property RotationX : GLFloat
property RotationY : GLFloat
property RotationZ : GLFloat
property Scene : TGLScene
property Shininess : GLFloat
property Specular : TGLColor
property Texture : TTexture
property W : GLFloat
property X : GLFloat
property Y : GLFloat
property Z : GLFloat
FAmbient : TGLColor;
FBoundingBox : TBoundingBox;
FChanged : Boolean;
FChanges : TObjectChanges;
FCSGGroup : TCSGGroup;
FDiffuse : TGLColor;
FEmission : TGLColor;
FGLScene : TGLScene;
FHandle : TObjectHandle;
FParent : TComposite;
FPosition : TGLCoordinates;
FRotation : TAffineFloatVector;
FScaling : TAffineFloatVector;
FShininess : GLFloat;
FSpecular : TGLColor;
FTexture : TTexture;
CONSTRUCTOR Create(AOwner: TComponent);
------------------ TSceneObject ----------------------------------------------
PROCEDURE BuildList;
DESTRUCTOR Destroy;
------------------------------------------------------------------------------
PROCEDURE DestroyList;
------------------------------------------------------------------------------
PROCEDURE FinishList;
------------------------------------------------------------------------------
PROCEDURE MoveTo(NewParent: TComposite);
------------------------------------------------------------------------------
PROCEDURE PrepareList;
------------------------------------------------------------------------------
PROCEDURE Rotate(Rx,Ry,Rz : GLFloat);
------------------------------------------------------------------------------
PROCEDURE Scale(Sx,Sy,Sz : GLFloat);
------------------------------------------------------------------------------
PROCEDURE Translate(Tx,Ty,Tz : GLFloat);
------------------------------------------------------------------------------
FUNCTION GetParentComponent: TComponent;
------------------------------------------------------------------------------
FUNCTION HasParent: Boolean;
------------------------------------------------------------------------------
PROCEDURE SetName(CONST NewName: TComponentName);
------------------------------------------------------------------------------
PROCEDURE SetParentComponent(Value: TComponent);
------------------------------------------------------------------------------
FUNCTION GetHandle: TObjectHandle;
------------------------------------------------------------------------------
FUNCTION GetIndex: Integer;
------------------------------------------------------------------------------
PROCEDURE SetAmbient(AValue: TGLColor);
------------------------------------------------------------------------------
PROCEDURE SetChanged(AValue: Boolean);
------------------------------------------------------------------------------
PROCEDURE SetCSGGroup(AGroup: TCSGGroup);
------------------------------------------------------------------------------
PROCEDURE SetDiffuse(AValue: TGLColor);
------------------------------------------------------------------------------
PROCEDURE SetIndex(AValue: Integer);
------------------------------------------------------------------------------
PROCEDURE SetPosition(APosition: TGLCoordinates);
------------------------------------------------------------------------------
PROCEDURE SetPositionW(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionX(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionY(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetPositionZ(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationX(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationY(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetRotationZ(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetShininess(AValue: GLFloat);
------------------------------------------------------------------------------
PROCEDURE SetSpecular(AValue: TGLColor);
------------------------------------------------------------------------------
property Ambient : TGLColor
property BoundingBox : TBoundingBox
property Changed : Boolean
property CSGGroup : TCSGGroup
property Diffuse : TGLColor
property Handle : TObjectHandle
property Index : Integer
property Parent : TComposite
property Position : TGLCoordinates
property RotationX : GLFloat
property RotationY : GLFloat
property RotationZ : GLFloat
property Scene : TGLScene
property Shininess : GLFloat
property Specular : TGLColor
property Texture : TTexture
property W : GLFloat
property X : GLFloat
property Y : GLFloat
property Z : GLFloat
FAmbient : TGLColor;
FBoundingBox : TBoundingBox;
FChanged : Boolean;
FChanges : TObjectChanges;
FCSGGroup : TCSGGroup;
FDiffuse : TGLColor;
FEmission : TGLColor;
FGLScene : TGLScene;
FHandle : TObjectHandle;
FParent : TComposite;
FPosition : TGLCoordinates;
FRotation : TAffineFloatVector;
FScaling : TAffineFloatVector;
FShininess : GLFloat;
FSpecular : TGLColor;
FTexture : TTexture;