Unit Globals

Classes

Functions

CursorOff - Get User and File server Name

Turn the Cursor On
CursorOn - Turn the cursor Off

While ON turn Off
Delay - Zap Full Name
GetUserFsName - Delay for Ms Millsecs

While off turn on
ReadDefaults - True if delay loop initiated

Inc

Types

Constants

OT_USER

Variables

AppTitle
BallMax
BallSize
Bg
BkGrnd
CntrText
DelayInit
Fg
FullName
iObjL
iObjR
iObjT
LoopsMs
MsgFont
MsgText
OverPwd
Pwd
PwdType
ScreenHt
ScreenWd
Speed
SpotSize
SpotSpeed
SsDelay
SsType
szFsName
szUserName
TestMode


Functions


Procedure CursorOff;

Get User and File server Name

Turn the Cursor On


Procedure CursorOn;

Turn the cursor Off

While ON turn Off


Procedure Delay(Ms : Integer);

Zap Full Name

Procedure GetUserFsName;

Delay for Ms Millsecs

While off turn on


Procedure ReadDefaults;

True if delay loop initiated

Inc


Types


Constants

OT_USER = 1


Variables

AppTitle : String

Center Text

BallMax : Integer

Delay

BallSize : Integer

Max Spheres B4 clear screen

Bg : Integer

BkGrnd : TColor

Message Text

CntrText : Boolean

Speed

DelayInit : Boolean

Spotlight Speed

Fg : Integer

Full User Name

FullName : String

File server Name

iObjL : Integer

iObjR : Integer

Current Object LEFT position

iObjT : Integer

Current Object RIGHT position

LoopsMs : LongInt

True if testing

MsgFont : TFont

Current Object TOP position

MsgText : String

Message Font

OverPwd : String

Ms loops

Pwd : String

Current screen saver title

PwdType : Integer

Password

ScreenHt : Integer

Screen width

ScreenWd : Integer

Foregound and Backgrpund index

Speed : Integer

Background Colour

SpotSize : Integer

Max Sphere Size

SpotSpeed : Integer

Spotlight Size

SsDelay : Integer

Screen Height

SsType : Integer

szFsName : array [0..50] of Char

User Name

szUserName : array [0..50] of Char

Overide password for WINDOWS

TestMode : Boolean

Type of password