Objekt TKAPBtrTable: Porovnání verzí

Z K.A.P.
Skočit na navigaciSkočit na vyhledávání
m (doplnění property)
Řádek 60: Řádek 60:
 
   procedure SetKey;
 
   procedure SetKey;
 
   procedure SetRange(const StartValues, EndValues: array of const);
 
   procedure SetRange(const StartValues, EndValues: array of const);
 +
  property Active: Boolean;
 +
  property AutoCalcFields: Boolean;
 +
  property DatabaseName: string;
 +
  property Filter: string;
 +
  property Filtered: Boolean;
 +
  property TableName: string;
 +
  property TableNextId: Word default 0;
 +
  property OpenMode: TBtrOpenMode default openNormal;
 +
  property ReadOnly: Boolean;
 +
  property TableOwner: string;
 +
  property SortFilter: string;
 +
  property TableOptions: TBtrTableOptions default [toAutoEraseFilter];
 +
  property Locale: TBtrLocale default lcAuto;
 +
  property UpgradeMode: TUpgradeMode default umQuestion;
 +
  property IndexFieldNames: string;
 +
  property IndexName: string;
 +
  property MasterFields: string;
 +
  property MasterSource: TDataSource;
 
  end;
 
  end;

Verze z 9. 2. 2013, 17:48

Objekt TKAPBtrTable

Tato třída slouží pro manipulaci s databázovými tabulkami. Je možné otevřít tabulku (konkrétní složka je určena automaticky na základě aktuální databáze, do které je uživatel přihlášen), procházet záznamy tabulky, filtrovat záznamy, načítat či měnit hodnoty z jednotlivých polí záznamu apod.

TKAPBtrTable = class(TDataset)
 constructor Create;
 function BookmarkValid(Bookmark: TBookmark): Boolean;
 function CompareBookmarks(Bookmark1, Bookmark2: TBookmark): Integer;
 function ControlsDisabled: Boolean;
 function CopyFields(Source: TDataSet): Integer;
 function FieldByName(const FieldName: String): TField;
 function FindField(const FieldName: String): TField;
 function FindKey(const KeyValues: array of const): Boolean;
 function GetBookmark: TBookmark;
 function GetBtrRecordLength: LongInt;
 function GotoKey: Boolean;
 function IsEmpty: Boolean;
 function IsLinkedTo(DataSource: TDataSource): Boolean;
 function IsRangeApplied: Boolean;
 function IsSequenced: Boolean;
 function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
 function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
 function MoveBy(Distance: Integer): Integer;
 function UpdateStatus: TUpdateStatus;
 procedure Append;
 procedure AppendRecord(const Values: array of const);
 procedure ApplyRange;
 procedure Cancel;
 procedure CancelRange;
 procedure ClearFields;
 procedure Close;
 procedure CopyTable(const NewTableName: string);
 procedure CreateTable(Rewrite: Boolean);
 procedure Delete;
 procedure DeleteTable;
 procedure DisableControls;
 procedure Edit;
 procedure EmptyTable;
 procedure EnableControls;
 procedure First;
 procedure FreeBookmark(Bookmark: TBookmark);
 procedure GetDetailDataSets(List: TList);
 procedure GetDetailLinkFields(MasterFields, DetailFields: TList);
 procedure GetFieldList(List: TList; const FieldNames: String);
 procedure GetFieldNames(List: TStrings);
 procedure GetIndexInfo;
 procedure GetIndexNames(List: TStrings);
 procedure GotoBookmark(Bookmark: TBookmark);
 procedure GotoCurrent(Table: TBtrTable);
 procedure GotoNearest;
 procedure CheckBrowseMode;
 procedure Insert;
 procedure InsertRecord(const Values: array of const);
 procedure Last;
 procedure Next;
 procedure Open;
 procedure Post;
 procedure Prior;
 procedure Refresh;
 procedure Resync(Mode: TResyncMode);
 procedure SetKey;
 procedure SetRange(const StartValues, EndValues: array of const);
 property Active: Boolean;
 property AutoCalcFields: Boolean;
 property DatabaseName: string;
 property Filter: string;
 property Filtered: Boolean;
 property TableName: string;
 property TableNextId: Word default 0;
 property OpenMode: TBtrOpenMode default openNormal;
 property ReadOnly: Boolean;
 property TableOwner: string;
 property SortFilter: string;
 property TableOptions: TBtrTableOptions default [toAutoEraseFilter];
 property Locale: TBtrLocale default lcAuto;
 property UpgradeMode: TUpgradeMode default umQuestion;
 property IndexFieldNames: string;
 property IndexName: string;
 property MasterFields: string;
 property MasterSource: TDataSource;
end;