Unit Bitmap

Classes

Functions

FreePic - Move the Message

xDirection, yDirection = 1 or -1
InitPicture - Read any defaults

Get the Speed
MovePic - Startup

Free the Hold Bitmap
ReadPicDefaults - Rectangular area picture and & new screen area displayed in.

Types

Constants

Variables

AnimatePic
BitmapFile
OldScrnRect
Pic
PicHeight
PicHold
PicHoldRect
PicRect
PicWidth
RectUnion
RectUnionSize
ScreenHeight
ScreenWidth
ScrnRect
xDirection
xPicPos
yDirection
yPicPos


Functions


Procedure FreePic;

Move the Message

xDirection, yDirection = 1 or -1


Procedure InitPicture;

Read any defaults

Get the Speed


Procedure MovePic;

Startup

Free the Hold Bitmap


Procedure ReadPicDefaults;

Rectangular area picture and & new screen area displayed in.

Free any resources


Types


Constants


Variables

AnimatePic : Boolean

BitmapFile : string

OldScrnRect : TRect

Pic : TBitmap

width & height of picture

PicHeight : Integer

PicHold : TBitmap

PicHoldRect : TRect

PicRect : TRect

Bitmap that is being displayed

PicWidth : Integer

directions to move bitmap

RectUnion : TRect

RectUnionSize : TRect

ScreenHeight : Integer

ScreenWidth : Integer

ScrnRect : TRect

xDirection : Integer

picture position

xPicPos : Integer

screen Width and Height

yDirection : Integer

yPicPos : Integer