| Class TCustomSprite (unit Sprites) |
TGraphicControl
| Constructors |
constructor Create(AOwner: TComponent);TCustomSprite base class
| Functions |
destructor Destroy;
procedure MoveSprite;
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure Paint;set size
procedure SetAndImage(AAndImage: TBitmap);
procedure SetOrImage(AOrImage: TBitmap);| Properties |
property AndImage : TBitmap
property OrImage : TBitmap| Events |
| Variables |
FAndImage : TBitmap;
FOrImage : TBitmap;| Constructors |
constructor Create(AOwner: TComponent);public declarations
TCustomSprite base class
| Functions |
destructor Destroy;create bitmap instances
procedure MoveSprite;
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);free bitmap instances
procedure Paint;protected declarations
set size
procedure SetAndImage(AAndImage: TBitmap);SetBounds sets the component bounds to the size of the image if an image is loaded.
procedure SetOrImage(AOrImage: TBitmap);set size
| Properties |
property AndImage : TBitmap
property OrImage : TBitmap| Events |
| Variables |
FAndImage : TBitmap;private declarations
FOrImage : TBitmap;