TDbf

type TDbf = class(TDataSet)

protected

  function GetDefaultBufferCount; override;

  procedure SetDefaultBufferCount(); virtual;

  function AllocRecordBuffer; override;

  procedure ClearCalcFields(); override;

  procedure FreeRecordBuffer(); override;

  procedure GetBookmarkData(); override;

  function GetBookmarkFlag(); override;

  function GetRecord(); override;

  function GetRecordSize; override;

  procedure InternalAddRecord(); override;

  procedure InternalClose; override;

  procedure InternalDelete; override;

  procedure InternalFirst; override;

  procedure InternalGotoBookmark(); override;

  procedure InternalHandleException; override;

  procedure InternalInitFieldDefs; override;

  procedure InternalInitRecord(); override;

  procedure InternalLast; override;

  procedure InternalOpen; override;

  procedure InternalEdit; override;

  procedure InternalCancel; override;

  procedure InternalPost; override;

  procedure InternalSetToRecord(); override;

  procedure InitFieldDefs; override;

  function IsCursorOpen; override;

  procedure SetBookmarkFlag(); override;

  procedure SetBookmarkData(); override;

  procedure SetFieldData(); override;

  function GetDataSource; override;

  function GetRecordCount; override;

  function GetRecNo; override;

  function GetCanModify; override;

  procedure SetRecNo(); override;

  procedure SetFiltered(); override;

  procedure SetFilterText(); override;

  function FindRecord(); override;

  function GetIndexFieldNames;

  procedure SetIndexFieldNames();

  procedure DoFilterRecord();

public

  constructor Create(); override;

  destructor Destroy; override;

  function GetFieldData(); override;

  procedure Resync(); override;

  function CreateBlobStream(); override;

  procedure Translate(); override;

  function CompareBookmarks(); override;

  procedure CheckDbfFieldDefs();

  function FindFirst; override;

  function FindLast; override;

  function FindNext; override;

  function FindPrior; override;

  procedure AddIndex();

  procedure RegenerateIndexes;

  procedure CancelRange;

  procedure CheckMasterRange;

  function PrepareKey();

  function SearchKeyPChar();

  procedure SetRangePChar();

  function GetCurrentBuffer;

  procedure ExtractKey();

  procedure UpdateIndexDefs; override;

  procedure GetFileNames();

  function GetFileNamesString();

  procedure GetIndexNames();

  procedure GetAllIndexFiles();

  procedure TryExclusive;

  procedure EndExclusive;

  function LockTable();

  procedure UnlockTable;

  procedure OpenIndexFile();

  procedure DeleteIndex();

  procedure CloseIndexFile();

  procedure RepageIndexFile();

  procedure CompactIndexFile();

  function IsDeleted;

  procedure Undelete;

  procedure CreateTable;

  procedure CreateTableEx();

  procedure CopyFrom();

  procedure RestructureTable();

  procedure PackTable;

  procedure EmptyTable;

  procedure Zap;

  procedure InitFieldDefsFromFields;

  property DefaultBufferCount: Cardinal; [rw]

  property AbsolutePath: string; [r]

  property DbfFieldDefs: TDbfFieldDefs; [r]

  property PhysicalRecNo: Integer; [rw]

  property BackLink: string; [rw]

  property LanguageID: Byte; [rw]

  property LanguageStr: string; [r]

  property CodePage: Cardinal; [r]

  property ExactRecordCount: Integer; [r]

  property PhysicalRecordCount: Integer; [r]

  property KeySize: Integer; [r]

  property DbfFile: TDbfFile; [r]

  property UserStream: TStream; [rw]

  property UserIndexStream: TStream; [rw]

  property UserMemoStream: TStream; [rw]

  property DisableResyncOnPost: Boolean; [rw]

  property NextAutoInc: Cardinal; [rw]

published

  property DateTimeHandling: TDateTimeHandling; [rw]

  property Exclusive: Boolean; [rw]

  property FilePath: string; [rw]

  property FilePathFull: string; [rws]

  property Indexes: TDbfIndexDefs; [rws]

  property IndexDefs: TDbfIndexDefs; [rw]

  property IndexFieldNames: string; [rws]

  property IndexName: string; [rw]

  property MasterFields: string; [rw]

  property MasterSource: TDataSource; [rw]

  property OpenMode: TDbfOpenMode; [rw]

  property ReadOnly: Boolean; [rw]

  property ShowDeleted: Boolean; [rw]

  property Storage: TDbfStorage; [rw]

  property StoreDefs: Boolean; [rw]

  property TableName: string; [rw]

  property TableLevel: Integer; [rw]

  property Version: string; [rws]

  property UseAutoInc: Boolean; [rw]

  property BeforeAutoCreate: TBeforeAutoCreateEvent; [rw]

  property OnCompareRecord: TNotifyEvent; [rw]

  property OnLanguageWarning: TLanguageWarningEvent; [rw]

  property OnLocaleError: TDbfLocaleErrorEvent; [rw]

  property OnIndexMissing: TDbfIndexMissingEvent; [rw]

  property OnCopyDateTimeAsString: TConvertFieldEvent; [rw]

  property OnTranslate: TTranslateEvent; [rw]

  property Active: Boolean;

  property FieldDefs: TFieldDefs; [s]

  property Filter: string;

  property Filtered: Boolean;

  property FilterOptions: TFilterOptions;

  property BeforeOpen: TDataSetNotifyEvent;

  property AfterOpen: TDataSetNotifyEvent;

  property BeforeClose: TDataSetNotifyEvent;

  property AfterClose: TDataSetNotifyEvent;

  property BeforeInsert: TDataSetNotifyEvent;

  property AfterInsert: TDataSetNotifyEvent;

  property BeforeEdit: TDataSetNotifyEvent;

  property AfterEdit: TDataSetNotifyEvent;

  property BeforePost: TDataSetNotifyEvent;

  property AfterPost: TDataSetNotifyEvent;

  property BeforeCancel: TDataSetNotifyEvent;

  property AfterCancel: TDataSetNotifyEvent;

  property BeforeDelete: TDataSetNotifyEvent;

  property AfterDelete: TDataSetNotifyEvent;

  property BeforeScroll: TDataSetNotifyEvent;

  property AfterScroll: TDataSetNotifyEvent;

  property OnCalcFields: TDataSetNotifyEvent;

  property OnDeleteError: TDataSetErrorEvent;

  property OnEditError: TDataSetErrorEvent;

  property OnFilterRecord: TFilterRecordEvent;

  property OnNewRecord: TDataSetNotifyEvent;

  property OnPostError: TDataSetErrorEvent;

end;

TDbf

TDataSet

TObject