* Published TIndexDef properties

git-svn-id: trunk@26768 -

packages/fcl-db/src/base/db.pas

@@ -1000,6 +1000,7 @@ type
   public
     constructor Create(Owner: TIndexDefs; const AName, TheFields: string;
       TheOptions: TIndexOptions); overload;
+  published    
     property Expression: string read GetExpression write SetExpression;
     property Fields: string read FFields write FFields;
     property CaseInsFields: string read FCaseinsFields write SetCaseInsFields;