Unit Ledcntrl

Classes

TLEDDisp -

Functions

GetLed -
Register -

Types

Constants

cnt

Variables

LCDs
LEDs


Functions


procedure GetLed(dig: char; state: boolean; var r: Trect);


procedure Register;


Types


Constants

cnt = 0


Variables

LCDs : TBitmap

LEDs : TBitmap