| Class TIntegerNumber (unit IntegerNumber) |
TComponent
| Constructors |
constructor Create( anOwner :TCOmponent );| 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;