Class TSprite (unit DXSprite)

Inherits from

TObject

Constructors


constructor Create(AParent: TSprite);

TSprite


Functions

procedure Clear;


function Collision: Integer;


procedure Dead;


destructor Destroy;


procedure Move(MoveCount: Integer);


procedure DoCollision(Sprite: TSprite; var Done: Boolean);


procedure DoDraw;


procedure DoMove(MoveCount: Integer);


function GetBoundsRect: TRect;


function TestCollision(Sprite: TSprite): Boolean;


procedure Add(Sprite: TSprite);


procedure AddDrawList(Sprite: TSprite);


procedure Collision2;


procedure Draw;


function GetClientRect: TRect;


function GetCount: Integer;


function GetItem(Index: Integer): TSprite;


function GetWorldX: Double;


function GetWorldY: Double;


procedure Remove(Sprite: TSprite);


procedure SetZ(Value: Integer);


Properties

property BoundsRect : TRect


property ClientRect : TRect


property Collisioned : Boolean


property Count : Integer


property Engine : TSpriteEngine


property Height : Integer


property Items : TSprite


property Moved : Boolean


property Parent : TSprite


property Visible : Boolean


property Width : Integer


property WorldX : Double


property WorldY : Double


property X : Double


property Y : Double


property Z : Integer


Events

Variables

FCollisioned : Boolean;


FDeaded : Boolean;


FDrawList : TList;


FEngine : TSpriteEngine;


FHeight : Integer;


FList : TList;


FMoved : Boolean;


FParent : TSprite;


FVisible : Boolean;


FWidth : Integer;


FX : Double;


FY : Double;


FZ : Integer;



Constructors


constructor Create(AParent: TSprite);

TSprite


Functions


procedure Clear;


function Collision: Integer;


procedure Dead;


destructor Destroy;


procedure Move(MoveCount: Integer);


procedure DoCollision(Sprite: TSprite; var Done: Boolean);


procedure DoDraw;


procedure DoMove(MoveCount: Integer);


function GetBoundsRect: TRect;


function TestCollision(Sprite: TSprite): Boolean;


procedure Add(Sprite: TSprite);


procedure AddDrawList(Sprite: TSprite);


procedure Collision2;


procedure Draw;


function GetClientRect: TRect;


function GetCount: Integer;


function GetItem(Index: Integer): TSprite;


function GetWorldX: Double;


function GetWorldY: Double;


procedure Remove(Sprite: TSprite);


procedure SetZ(Value: Integer);


Properties


property BoundsRect : TRect


property ClientRect : TRect


property Collisioned : Boolean


property Count : Integer


property Engine : TSpriteEngine


property Height : Integer


property Items : TSprite


property Moved : Boolean


property Parent : TSprite


property Visible : Boolean


property Width : Integer


property WorldX : Double


property WorldY : Double


property X : Double


property Y : Double


property Z : Integer


Events


Variables


FCollisioned : Boolean;


FDeaded : Boolean;


FDrawList : TList;


FEngine : TSpriteEngine;


FHeight : Integer;


FList : TList;


FMoved : Boolean;


FParent : TSprite;


FVisible : Boolean;


FWidth : Integer;


FX : Double;


FY : Double;


FZ : Integer;