Class TPet (unit Pet)

Inherits from

TComponent

***************************************************************************** Class: TPet responsibilities

Constructors


constructor Create( owner : TComponent );

TPet.


Functions

function Says : string;


Properties

property BestFriend : TPet


property Sound : string


property WorstEnemy : TPet


Events

Variables

FBestFriend : TPet;


FWorstEnemy : TPet;



Constructors


constructor Create( owner : TComponent );

TPet.Create description


Functions


function Says : string;


Properties


property BestFriend : TPet


property Sound : string


property WorstEnemy : TPet


Events


Variables


FBestFriend : TPet;


FWorstEnemy : TPet;