| Class TTableSetHelper (unit TableSet) |
TObject
Operations on Table Set's (e.g., DataModules
| Constructors |
constructor Create;| Functions |
procedure BackupTables;
procedure BackupTablesToStream(Stream: TStream);
procedure CheckErrors;
procedure ClearIdxDefsTables;
procedure CloseTables;
procedure CreateTables;
procedure CreateTablesWithIdx;
procedure DeleteTables;
destructor Destroy;
procedure ForEachTable(EachProc: TEachTableProc);
procedure OpenTables;
procedure RegenIndexes(Table: TTable);
procedure RestoreTables;
procedure RestoreTablesFromStream(Stream: TStream);
procedure AddIndexes(Table: TTable);
procedure AddPrimaryIdx(Table: TTable);
procedure BackupCallback(RecordNum: integer; const Msg: string; DS: TDataSet);
procedure BackupTable(Table: TTable);
procedure BackupTableToStream(Table: TTable);
procedure ClearIdxDefsTable(Table: TTable);
procedure CloseTable(Table: TTable);
function CreateMemStream(const TableName: string): TMemoryStream;
procedure CreateTable(Table: TTable);
procedure DeleteTable(Table: TTable);
procedure EndStatus;
procedure OpenTable(Table: TTable);
procedure RestoreCallback(RecordNum: integer; const Msg: string; DS: TDataSet);
procedure RestoreTable(Table: TTable);
procedure RestoreTableFromStream(Table: TTable);
procedure SendStatus(const StatMsg: string);| Properties |
| Events |
| Variables |
DataGroup : TComponent;
ErrLog : TStringList;
IdxProc : TSpecialIdxProc;
ShowErrors : boolean;
StatusProc : TStatusProc;
BackStream : TStream;| Constructors |
constructor Create;********************************************************************** TTableSetHelper
| Functions |
procedure BackupTables;
procedure BackupTablesToStream(Stream: TStream);To current directory as *.txt
procedure CheckErrors;
procedure ClearIdxDefsTables;
procedure CloseTables;
procedure CreateTables;
procedure CreateTablesWithIdx;
procedure DeleteTables;Add the New Ones
destructor Destroy;
procedure ForEachTable(EachProc: TEachTableProc);
procedure OpenTables;Public functions
procedure RegenIndexes(Table: TTable);
procedure RestoreTables;
procedure RestoreTablesFromStream(Stream: TStream);
procedure AddIndexes(Table: TTable);
procedure AddPrimaryIdx(Table: TTable);For Each functions
procedure BackupCallback(RecordNum: integer; const Msg: string; DS: TDataSet);Load the ms Stream from the BackStream
procedure BackupTable(Table: TTable);
procedure BackupTableToStream(Table: TTable);
procedure ClearIdxDefsTable(Table: TTable);
procedure CloseTable(Table: TTable);Not everyone will want this feature
function CreateMemStream(const TableName: string): TMemoryStream;
procedure CreateTable(Table: TTable);
procedure DeleteTable(Table: TTable);
procedure EndStatus;
procedure OpenTable(Table: TTable);
procedure RestoreCallback(RecordNum: integer; const Msg: string; DS: TDataSet);
procedure RestoreTable(Table: TTable);
procedure RestoreTableFromStream(Table: TTable);
procedure SendStatus(const StatMsg: string);Protected Functions
| Properties |
| Events |
| Variables |
DataGroup : TComponent;
ErrLog : TStringList;
IdxProc : TSpecialIdxProc;
ShowErrors : boolean;
StatusProc : TStatusProc;
BackStream : TStream;