Class TScoreBoard (unit Score)

Inherits from

TTextObject

****** * * Module: Score * Author: Joe Kessler * IntegrationWare - A New Generation of Extraordinary PC Solutions * www.integrationware.com * * Purpose: * * This module implements the TScoreBoard object, which is a special * derivation of a Text object. This class also keeps tracks of a numeric * score, and the number of lives that the player still has remaining. * ******

Constructors


constructor Create(lstObjects: TList);

Class constructor and destructor.


Functions

destructor Destroy;

Start with an initial score of zero.

function iGetBartCount: Integer;

Move to the next static Bart position.

procedure SetBartCount(iNewCount: Integer);

Format a new six-digit score text.

procedure SetScore(iNewScore: Integer);

List of fake Bart objects.

Properties

property iBartCount : Integer


property iCurrentScore : Integer

Exposed properties.

Events

Variables

m_iCurrentScore : Integer;


m_lstBarts : TList;

The player's current score.


Constructors


constructor Create(lstObjects: TList);

Class constructor and destructor.


Functions


destructor Destroy;

Start with an initial score of zero.


function iGetBartCount: Integer;

Move to the next static Bart position.


procedure SetBartCount(iNewCount: Integer);

Format a new six-digit score text.


procedure SetScore(iNewScore: Integer);

List of fake Bart objects. } { Methods for getting/setting property values.

Perform default cleanup.


Properties


property iBartCount : Integer


property iCurrentScore : Integer

Exposed properties.


Events


Variables


m_iCurrentScore : Integer;


m_lstBarts : TList;

The player's current score.