Class TFloatEdit (unit ValCtrls) |
Inherits from
TValidCustomEdit
constructor Create( AOwner: TComponent );
- Public declarations
**************************************************************************}
function Validate: Boolean;
Protected declarations
function GetValue: Extended;
procedure SetDigits( Digits: Integer );
procedure SetFormat( Format: TFloatView );
procedure SetMaxValue( AMaxValue: Extended );
procedure SetMinValue( AMinValue: Extended );
procedure SetPrecision( Precision: Integer );
procedure SetValue( AValue: Extended );
Float format *) { Private declarations
procedure UpdateValue;
property AllowEmpty :
property AutoSelect :
property BeepOnInvalid :
property BorderStyle :
property Digits : Integer
property Format : TFloatView
property MaxValue : Extended
property MinValue : Extended
Published declarations
property Precision : Integer
property ReadOnly :
property UseBounds : Boolean
property Value : Extended
property IsEmpty :
property IsValid :
event OnChange :
event OnEnter :
event OnExit :
event OnInvalid :
FDigits : Integer;
Apply Min/Max bounds
FFormat : TFloatView;
Float format for FloatToStrF
FMaxValue : Extended;
Minimum value for field
FMinValue : Extended;
FPrecision : Integer;
Max number for digits to show
FStrFormat : TFloatFormat;
Number of decimal digits to show
FUseBounds : Boolean;
Current value for field
FValue : Extended;
Maximum value for field
constructor Create( AOwner: TComponent );
Public declarations
**************************************************************************}
function Validate: Boolean;
Protected declarations
function GetValue: Extended;
procedure SetDigits( Digits: Integer );
procedure SetFormat( Format: TFloatView );
procedure SetMaxValue( AMaxValue: Extended );
procedure SetMinValue( AMinValue: Extended );
procedure SetPrecision( Precision: Integer );
procedure SetValue( AValue: Extended );
Float format *) { Private declarations
procedure UpdateValue;
property AllowEmpty :
property AutoSelect :
property BeepOnInvalid :
property BorderStyle :
property Digits : Integer
property Format : TFloatView
property MaxValue : Extended
property MinValue : Extended
Published declarations
property Precision : Integer
property ReadOnly :
property UseBounds : Boolean
property Value : Extended
property IsEmpty :
property IsValid :
event OnChange :
event OnEnter :
event OnExit :
event OnInvalid :
FDigits : Integer;
Apply Min/Max bounds
FFormat : TFloatView;
Float format for FloatToStrF
FMaxValue : Extended;
Minimum value for field
FMinValue : Extended;
FPrecision : Integer;
Max number for digits to show
FStrFormat : TFloatFormat;
Number of decimal digits to show
FUseBounds : Boolean;
Current value for field
FValue : Extended;
Maximum value for field