Class TSpriteEngineEx

Unit

AdSpriteEngineEx

Declaration

type TSpriteEngineEx = class(TSpriteEngine)

Description

An extended spriteengine that is able to zoom in and to rotate the scene. Absolute screen coordinates can be transformed into spriteengine coordinates using the "ScreenPointToSpriteCoords" function.

Hierarchy

• TObject
• TSprite
• TSpriteEngine
• TSpriteEngineEx

Overview

Methods

	constructor Create(AParent:TAdDraw);
	procedure Draw; override;
	function ScreenPointToSpriteCoords(p:TAdPoint):TAdPoint;

Properties

	property ViewPort: TAdRect read FViewPort write SetViewPort;
	property Rotation: single read FRotation write SetRotation;
	property Zoom: single read FZoom write SetZoom;

Description

Methods

	constructor Create(AParent:TAdDraw);
Creates an instance of TSpriteEngineEx

	procedure Draw; override;
Draws the scene

	function ScreenPointToSpriteCoords(p:TAdPoint):TAdPoint;
Transforms screen coordinates to sprite coordinates.

Properties

	property ViewPort: TAdRect read FViewPort write SetViewPort;
Set this property to limit the viewport of the current scene.

	property Rotation: single read FRotation write SetRotation;
Use the rotation property to rotate the scene. The rotation must be given in radian measure.

	property Zoom: single read FZoom write SetZoom;
The zoom value. A value of e.g. two means that all things are twice as big is in original size.