Class TSceneObject (unit GLScene)

Inherits from

TComponent

Constructors


CONSTRUCTOR Create(AOwner: TComponent);

------------------ TSceneObject ----------------------------------------------


Functions

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);

------------------------------------------------------------------------------

Properties

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


Events

Variables

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;



Constructors


CONSTRUCTOR Create(AOwner: TComponent);

------------------ TSceneObject ----------------------------------------------


Functions


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);

------------------------------------------------------------------------------


Properties


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


Events


Variables


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;