| Class Tip_AUTOINC (unit _ipAUTOINC) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
function LastID:integer;
procedure WriteID(ID:integer);
procedure Loaded;
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure AfterInsert(DataSet: TDataSet);
procedure BeforePost(DataSet: TDataSet);
function FirstField:TField;
function GetDataset: TDataset;
procedure SetDataset(Value: TDataset);| Properties |
property DataSet : TDataset
property Enabled : Boolean
property FirstID : Integer
property Prefix : String
property UpdateAction : TUpdateActions| Events |
| Variables |
FAfterInsertEvent : TDataSetNotifyEvent;
FBeforePostEvent : TDataSetNotifyEvent;
FDataset : TDataset;
FEnabled : Boolean;
FFirstID : Integer;
FPrefix : String;
FUpdateAction : TUpdateActions;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
destructor Destroy;
function LastID:integer;
procedure WriteID(ID:integer);
procedure Loaded;
procedure Notification(AComponent: TComponent;
Operation: TOperation);Protected declarations
procedure AfterInsert(DataSet: TDataSet);if Value <> nil then Value.FreeNotification(Self);
procedure BeforePost(DataSet: TDataSet);
function FirstField:TField;
function GetDataset: TDataset;
procedure SetDataset(Value: TDataset);| Properties |
property DataSet : TDatasetPublished declarations } //property DataField: string read GetDataField write SetDataField;
property Enabled : Boolean
property FirstID : Integer
property Prefix : String
property UpdateAction : TUpdateActions| Events |
| Variables |
FAfterInsertEvent : TDataSetNotifyEvent;
FBeforePostEvent : TDataSetNotifyEvent;
FDataset : TDataset;
FEnabled : Boolean;
FFirstID : Integer;
FPrefix : String;
FUpdateAction : TUpdateActions;