Class TINITable (unit INISec)

Inherits from

TComponent

Constructors


constructor Create(AOwner:TComponent);

TINITable


Functions

destructor Destroy;


function FieldByName(const FieldName:string):TINIField;


function FindField(const FieldName:string):TINIField;


procedure GetFieldNames(List:TStrings);


procedure AnyFieldChange(Field:TINIField);


procedure CheckCanModify;


procedure CheckFieldName(const FieldName:string;Field:TINIField);


function Connected:Boolean;


procedure GetChildren(Proc:TGetChildProc{$ifndef VER90};Root:TComponent{$endif});


function GetDatabase:TINIDatabase;


function GetParentComponent:TComponent;


function HasParent:Boolean;


procedure Loaded;


procedure ReadState(Reader:TReader);


procedure SetChildOrder(Component:TComponent;Order:Integer);


procedure SetDatabase(DB:TINIDatabase);


procedure SetName(const Value:TComponentName);


procedure SetParentComponent(AParent:TComponent);


procedure AddField(Field:TINIField);


procedure AdjustParentDestination;


procedure DestroyFields;


function FieldByNumber(FieldNo:Integer):TINIField;


function GetDestination:TDestination;


function GetEditOnlyMode:Boolean;


function GetField(Index:Integer):TINIField;


function GetFieldCount:Integer;


function GetFileName:string;


function GetINIStream:TINIStream;


function GetReadOnly:Boolean;


function GetRuntimeDestination:TDestination;


function GetRuntimeFileName:string;


function GetRuntimePrivateMode:TPrivateMode;


function GetTableParent:TComponent;


function IsDestinationStored:Boolean;


function IsSon:Boolean;


procedure RemoveField(Field:TINIField);


procedure SetDestination(DT:TDestination);


procedure SetField(Index:Integer;Value:TINIField);


procedure SetFileName(const FName:string);


procedure SetParentDestination(PD:Boolean);


procedure SetPrivateMode(PM:TPrivateMode);


procedure SetTableParent(AParent:TComponent);


function StoredIfNotParentDestination:Boolean;


Properties

property Destination : TDestination


property FileName : string


property ReadOnly : Boolean


property Database : TINIDatabase


property FieldCount : Integer


property Fields : TINIField


property INIStream : TINIStream


property Modified : Boolean


property Parent : TComponent


property ParentDestination : Boolean


property PrivateMode : TPrivateMode


property Son : Boolean


property TableNo : Integer


property EditOnlyMode : Boolean


property RuntimeDestination : TDestination


property RuntimeFileName : string


property RuntimePrivateMode : TPrivateMode


Events

event OnFieldChange : TINIFieldNotifyEvent


Variables

FCopyFromFileName : string;


FDatabase : TINIDatabase;


FDestination : TDestination;


FDirection : TCreateDirection;


FFields : TList;


FFileName : string;


FINIStream : TINIStream;


FModified : Boolean;


FOnFieldChange : TINIFieldNotifyEvent;


FParentDestination : Boolean;


FParentField : TINIField;


FPrivateMode : TPrivateMode;


FReadOnly : Boolean;


FTableNo : Integer;



Constructors


constructor Create(AOwner:TComponent);

TINITable


Functions


destructor Destroy;


function FieldByName(const FieldName:string):TINIField;


function FindField(const FieldName:string):TINIField;


procedure GetFieldNames(List:TStrings);


procedure AnyFieldChange(Field:TINIField);


procedure CheckCanModify;


procedure CheckFieldName(const FieldName:string;Field:TINIField);


function Connected:Boolean;


procedure GetChildren(Proc:TGetChildProc{$ifndef VER90};Root:TComponent{$endif});


function GetDatabase:TINIDatabase;


function GetParentComponent:TComponent;


function HasParent:Boolean;


procedure Loaded;


procedure ReadState(Reader:TReader);


procedure SetChildOrder(Component:TComponent;Order:Integer);


procedure SetDatabase(DB:TINIDatabase);


procedure SetName(const Value:TComponentName);


procedure SetParentComponent(AParent:TComponent);


procedure AddField(Field:TINIField);


procedure AdjustParentDestination;


procedure DestroyFields;


function FieldByNumber(FieldNo:Integer):TINIField;


function GetDestination:TDestination;


function GetEditOnlyMode:Boolean;


function GetField(Index:Integer):TINIField;


function GetFieldCount:Integer;


function GetFileName:string;


function GetINIStream:TINIStream;


function GetReadOnly:Boolean;


function GetRuntimeDestination:TDestination;


function GetRuntimeFileName:string;


function GetRuntimePrivateMode:TPrivateMode;


function GetTableParent:TComponent;


function IsDestinationStored:Boolean;


function IsSon:Boolean;


procedure RemoveField(Field:TINIField);


procedure SetDestination(DT:TDestination);


procedure SetField(Index:Integer;Value:TINIField);


procedure SetFileName(const FName:string);


procedure SetParentDestination(PD:Boolean);


procedure SetPrivateMode(PM:TPrivateMode);


procedure SetTableParent(AParent:TComponent);


function StoredIfNotParentDestination:Boolean;


Properties


property Destination : TDestination


property FileName : string


property ReadOnly : Boolean


property Database : TINIDatabase


property FieldCount : Integer


property Fields : TINIField


property INIStream : TINIStream


property Modified : Boolean


property Parent : TComponent


property ParentDestination : Boolean


property PrivateMode : TPrivateMode


property Son : Boolean


property TableNo : Integer


property EditOnlyMode : Boolean


property RuntimeDestination : TDestination


property RuntimeFileName : string


property RuntimePrivateMode : TPrivateMode


Events


event OnFieldChange : TINIFieldNotifyEvent


Variables


FCopyFromFileName : string;


FDatabase : TINIDatabase;


FDestination : TDestination;


FDirection : TCreateDirection;


FFields : TList;


FFileName : string;


FINIStream : TINIStream;


FModified : Boolean;


FOnFieldChange : TINIFieldNotifyEvent;


FParentDestination : Boolean;


FParentField : TINIField;


FPrivateMode : TPrivateMode;


FReadOnly : Boolean;


FTableNo : Integer;