Class TIntOnChange (unit OnChang)

Inherits from

TComponent

Constructors


constructor Create(aOwner: tComponent);



Functions

function ReadPreviousValue: integer;


function ReadValue: integer;


procedure ResetStats;


procedure WriteValue(NewValue: integer);


Properties

property AfterChange : TAfterChangeEvent


property BeforeChange : TBeforeChangeEvent


Events

Variables

CountValue : LongInt;


MaxValue : LongInt;


MinValue : LongInt;


StatsStartTime : TdateTime;


SumValue : LongInt;


DeltaValue : integer;


fAfterChange : TAfterChangeEvent;


fBeforeChange : TBeforeChangeEvent;


fCurrentValue_NO_ACCESS : integer;


fPreviousValue_NO_ACCESS : integer;



Constructors


constructor Create(aOwner: tComponent);


Functions


function ReadPreviousValue: integer;


function ReadValue: integer;


procedure ResetStats;


procedure WriteValue(NewValue: integer);


Properties


property AfterChange : TAfterChangeEvent


property BeforeChange : TBeforeChangeEvent


Events


Variables


CountValue : LongInt;


MaxValue : LongInt;


MinValue : LongInt;


StatsStartTime : TdateTime;


SumValue : LongInt;


DeltaValue : integer;


fAfterChange : TAfterChangeEvent;


fBeforeChange : TBeforeChangeEvent;


fCurrentValue_NO_ACCESS : integer;


fPreviousValue_NO_ACCESS : integer;