TDDFieldDefs

type TDDFieldDefs = class(TDDTableCollection)

protected

  procedure SetTableName(); override;

public

  constructor Create();

  class function FieldDefClass; virtual;

  property TableDef: TDDTableDef; [r]

  property TableName: string; [rw]

  function AddField();

  function IndexOfField();

  function FindField();

  function FieldByName();

  procedure FillFieldList();

  property Fields []: TDDFieldDef; default; [rw]

end;

TDDFieldDefs

TDDTableCollection

TObject