TtiCriteria

type TtiCriteria = class(TtiObject) end;

protected

  function GetOwner; virtual;

  procedure SetOwner(); virtual;

  procedure AssignClassProps(); override;

  procedure AssignPublicProps(); override;

public

  constructor Create();

  destructor Destroy; override;

  procedure MapFieldNames();

  procedure AddAndCriteria();

  procedure AddBetween();

  procedure AddEqualTo(); overload;

  procedure AddExists();

  procedure AddGreaterOrEqualThan(); overload;

  procedure AddGreaterThan(); overload;

  procedure AddGroupBy();

  procedure AddIn();

  procedure AddLessOrEqualThan(); overload;

  procedure AddLessThan(); overload;

  procedure AddLike();

  procedure AddNotEqualTo(); overload;

  procedure AddNotExists();

  procedure AddNotIn();

  procedure AddNotLike();

  procedure AddNotNull();

  procedure AddNull();

  procedure AddOrCriteria();

  procedure AddOrderBy();

  procedure AddOrderByAscending();

  procedure AddOrderByDescending();

  procedure AddSQL();

  procedure ClearAll;

  function GetGroupByList;

  function GetOrderByList;

  function isEmbraced;

  function HasCriteria;

  function HasOrderBy;

  property CriteriaType: TCriteriaType; [rw]

  property Owner: TtiCriteria; [rw]

published

  property Criterias: TtiCriteriaList; [r]

  property Name: string; [r]

  property SelectionCriterias: TtiSelectionCriteriaList; [r]

TtiCriteria

TtiObject

Base class for single objects

TtiVisited

The class that gets visited

TtiBaseObject,IInterface

TObject