Unit Kr_Led

///////////////////////////////////// class KrLed // Version 1.0 // Date 04-10-97 // E-Mail kray@iaehv.nl // Page www.iaehv.nl/users/kray // /////////////////////////////////////

Classes

KrAboutProperty - Public declarations
KrLed -
TKrAbout -

Functions

Register -

Types

TAfterChange
TAlign
TBeforeChange
TBorder
TCAlign
TState

Constants

Variables


Functions


procedure Register;


Types


TAfterChange=procedure(Sender:TObject) of object

TAlign=(alLeft, alRight, alCenter, alBottom, alTop);

TBeforeChange=procedure(Sender:TObject; var AStatus:boolean) of object

TBorder=(olNone, ol3dUp, ol3dDown, olLine);

TCAlign=(caLeft, caRight, caCenter, caTop, caBottom);

TState=(stOn, stOff);

Constants


Variables