The is a component to control the filter of a TTabel
If you make changes send me a copy to jcc@megabug.de
IF you use this component in comercial then send me 10 Euro for using.
Bank:
     Sparkasse in Bremen
     BLZ  290 50 101
     Kto.  10 69 012
You can change this component where you want, but not this text !

################################################################################

TFilterSearchType = (fstTrue,fstFalse,fstVisibleTrue,fstVisibleFalse,fstHide);
  fstTrue           :show in edit
  fstFalse          :dont show in edit
  fstVisibleTrue    :show in edit, if the field is visible
  fstVisibleFalse   :show in edit, if the field is not visible
  fstHide           :dont show in edit, but set the value

The 
    Function TFilterSearch.add(UsesType:TFilterSearchType;
                               FieldName:String;
                               DisplayName:String;
                               Value:String);
is used to set filter values as default !

The Procedure Clear is to delete all default values !


