Class TIntegerNumber (unit IntegerNumber)

Inherits from

TComponent

Constructors


constructor Create( anOwner :TCOmponent );

TIntegerNumber


Functions

function AdjustValue( Value :integer ):Integer;


procedure Change;


function ChangeQuery( NewValue :Integer ) :boolean;


procedure DoOverflow;


procedure DoUnderflow;


procedure Overflow;


procedure Underflow;


procedure SetMax( V :Integer );


procedure SetMin( V :Integer );


procedure SetValue( V :Integer );


Properties

property Max : Integer


property Min : Integer


property Options : TIntegerNumberOptions


property Value : Integer


Events

event OnChange : TNotifyEvent


event OnChangeQuery : TIntChangeQueryEvent


event OnOverflow : TNotifyEvent


event OnUnderflow : TNotifyEvent


Variables

FMax : Integer;


FMin : Integer;


FOnChange : TNotifyEvent;


FOnChangeQuery : TIntChangeQueryEvent;


FOnOverflow : TNotifyEvent;


FOnUnderflow : TNotifyEvent;


FOptions : TIntegerNumberOptions;


FValue : Integer;



Constructors


constructor Create( anOwner :TCOmponent );

TIntegerNumber


Functions


function AdjustValue( Value :integer ):Integer;


procedure Change;


function ChangeQuery( NewValue :Integer ) :boolean;


procedure DoOverflow;


procedure DoUnderflow;


procedure Overflow;


procedure Underflow;


procedure SetMax( V :Integer );


procedure SetMin( V :Integer );


procedure SetValue( V :Integer );


Properties


property Max : Integer


property Min : Integer


property Options : TIntegerNumberOptions


property Value : Integer


Events


event OnChange : TNotifyEvent


event OnChangeQuery : TIntChangeQueryEvent


event OnOverflow : TNotifyEvent


event OnUnderflow : TNotifyEvent


Variables


FMax : Integer;


FMin : Integer;


FOnChange : TNotifyEvent;


FOnChangeQuery : TIntChangeQueryEvent;


FOnOverflow : TNotifyEvent;


FOnUnderflow : TNotifyEvent;


FOptions : TIntegerNumberOptions;


FValue : Integer;