Real Range Validator Component for Delphi

The file VAEdit.pas is the source for a Delphi component
that descends from the TEdit component.  It will accept
input for a range of real numbers.

Example:  
             -3.4 < x < 100

Properties:

GreaterNumber:  real number where input must be of greater value.

LessNumber:  real number where the input must be of lesser value.

GreaterOrEqual:  If true then the input value must be greater than
                 or equal to GreaterNumber.  If false then input
                 value must be greater than but NOT equal to 
                 GreaterNumber.

LessOrEqual:  If true then the input value must be less than
              or equal to LessNumber.  If false then input value must 
              be less than but NOT equal to LessNumber.


The following line of code will only allow these values
to be input by the keyboard.

ValidateChar := ['0'..'9','.','-','+','e','E'];

The 'e' and 'E' are there for the ability to input using scientific
notation.  Example:    3.21e2 = 321
                            or
                       3.21e-2 = 0.0321


Hope this helps someone who needs this type of input for Delphi.


Frank DeBlanc
@70713,640