Unit OnChang

Classes

TIntOnChange -

Functions

Register -

Types

TAfterChangeEvent
TBeforeChangeEvent

Constants

Variables


Functions


procedure Register;


Types


TAfterChangeEvent =
     procedure(DeltaValue, PreviousValue, CurrentValue: integer) of Object

TBeforeChangeEvent =
     procedure(DeltaValue, CurrentValue, NewValue: integer;
               var Accept:boolean) of Object

Constants


Variables