Unit mdb

Description
Classes, Interfaces, Objects and Records
Functions and Procedures
Types
Constants

Description

This item has no description.

Overview

Classes, Interfaces, Objects and Records

Name Description
Class EDatabaseError  
Class EUpdateError  
Record TDateTimeRec  
Class TNamedItem  
Class TDefCollection  
Class TFieldDef  
Class TFieldDefs  
Record TLookupListRec  
Class TLookupList  
Class TField  
Class TStringField  
Class TWideStringField  
Class TNumericField  
Class TLongintField  
Class TIntegerField  
Class TLargeintField  
Class TSmallintField  
Class TWordField  
Class TAutoIncField  
Class TFloatField  
Class TCurrencyField  
Class TBooleanField  
Class TDateTimeField  
Class TDateField  
Class TTimeField  
Class TBinaryField  
Class TBytesField  
Class TVarBytesField  
Class TBCDField  
Class TFMTBCDField  
Class TBlobField  
Class TMemoField  
Class TWideMemoField  
Class TGraphicField  
Class TVariantField  
Class TGuidField  
Class TIndexDef  
Class TIndexDefs  
Class TCheckConstraint  
Class TCheckConstraints  
Class TFieldsEnumerator  
Class Tfields  
Class TParam  
Class TParams  
Interface IProviderSupport  
Class TDataSet  
Class TDataLink  
Class TDetailDataLink  
Class TMasterDataLink  
Class TDataSource  
Class TDBDataset  
Class TDBTransaction  
Class TCustomConnection  
Class TDatabase  
Class TMasterParamsDataLink  

Functions and Procedures

Procedure DatabaseError(Const Msg : String); overload;
Procedure DatabaseError(Const Msg : String; Comp : TComponent); overload;
Procedure DatabaseErrorFmt(Const Fmt : String; Args : Array Of Const); overload;
Procedure DatabaseErrorFmt(Const Fmt : String; Args : Array Of const; Comp : TComponent); overload;
Function ExtractFieldName(Const Fields: String; var Pos: Integer): String;
Function DateTimeRecToDateTime(DT: TFieldType; Data: TDateTimeRec): TDateTime;
Function DateTimeToDateTimeRec(DT: TFieldType; Data: TDateTime): TDateTimeRec;
procedure DisposeMem(var Buffer; Size: Integer);
function BuffersEqual(Buf1, Buf2: Pointer; Size: Integer): Boolean;
function SkipComments(var p: PChar; EscapeSlash, EscapeRepeat : Boolean) : boolean;

Types

LargeInt = Int64;
PLargeInt= ˆLargeInt;
TStringFieldBuffer = Array[0..dsMaxStringSize] of Char;
TDataSetState = (...);
TDataEvent = (...);
TUpdateStatus = (...);
TUpdateStatusSet = SET OF TUpdateStatus;
TUpdateMode = (...);
TResolverResponse = (...);
TFieldClass = class of TField;
TFieldType = (...);
TFieldMap = array[TFieldType] of Byte;
TDateTimeAlias = type TDateTime;
PDateTimeRec = ˆTdateTimeRec;
TFieldAttribute = (...);
TFieldAttributes = set of TFieldAttribute;
TFieldKind = (...);
TFieldKinds = Set of TFieldKind;
TProviderFlag = (...) deprecated;
TProviderFlags = set of TProviderFlag deprecated;
optionfieldty = (...);
optionsfieldty = set of optionfieldty;
TFieldNotifyEvent = procedure(Sender: TField) of object;
TFieldGetTextEvent = procedure(Sender: TField; var aText: string; DisplayText: Boolean) of object;
TFieldSetTextEvent = procedure(Sender: TField; const aText: string) of object;
TFieldRef = ˆTField;
TFieldChars = set of Char;
PLookupListRec = ˆTLookupListRec;
fielddataenteredeventty = procedure(const sender: tfield; const editobj: tobject) of object;
integerfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: int32; var accept: boolean) of object;
int64fieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: int64; var accept: boolean) of object;
bcdfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: currency; var accept: boolean) of object;
floatfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: flo64; var accept: boolean) of object;
datetimefieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: tdatetime; var accept: boolean) of object;
booleanfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: boolean; var accept: boolean) of object;
msestringfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: msestring; var accept: boolean) of object;
ansistringfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: ansistring; var accept: boolean) of object;
TBlobStreamMode = (...);
TBlobType = ftBlob..ftWideMemo;
TIndexOption = (...);
TIndexOptions = set of TIndexOption;
TBlobData = AnsiString;
TParamBinding = array of integer;
TParamType = (...);
TParamTypes = set of TParamType;
TParamStyle = (...);
blobkindty = (...);
TBookmark = Pointer;
TBookmarkStr = string;
PBookmarkFlag = ˆTBookmarkFlag;
TBookmarkFlag = (...);
TRecordBufferBaseType = AnsiChar;
TRecordBuffer = PAnsiChar;
PBufferList = ˆTBufferList;
TBufferList = array[0..dsMaxBufferCount - 1] of TRecordBuffer;
TBufferArray = ˆTRecordBuffer;
bufferaty = array[0..1] of trecordbuffer;
pbufferaty = ˆbufferaty;
TGetMode = (...);
TGetResult = (...);
TResyncMode = set of (rmExact, rmCenter);
TDataAction = (...);
TUpdateAction = (...);
TUpdateKind = (...);
TLocateOption = (...);
TLocateOptions = set of TLocateOption;
TDataOperation = procedure of object;
TDataSetNotifyEvent = procedure(DataSet: TDataSet) of object;
TDataSetErrorEvent = procedure(DataSet: TDataSet; E: EDatabaseError; var DataAction: TDataAction) of object;
TFilterOption = (...);
TFilterOptions = set of TFilterOption;
TFilterRecordEvent = procedure(DataSet: TDataSet; var Accept: Boolean) of object;
TDatasetClass = Class of TDataset;
TPSCommandType = (...);
datasetinternalstatety = (...);
datasetinternalstatesty = set of datasetinternalstatety;
TDataChangeEvent = procedure(Sender: TObject; Field: TField) of object;
ifistatechangedeventty = procedure(const sender: tdatasource; const alink: tdatalink; const aclient: iificlient; const astate: ifiwidgetstatesty) of object;
TDBDatasetClass = Class of TDBDataset;
TDBTransactionClass = Class of TDBTransaction;
TLoginEvent = procedure(Sender: TObject; Username, Password: string) of object;
TDatabaseClass = Class Of TDatabase;

Constants

dsMaxBufferCount = MAXINT div 8;
dsMaxStringSize = 8192;
YesNoChars : Array[Boolean] of char = ('N', 'Y');
SQLDelimiterCharacters = [';',',',' ','(',')',#13,#10,#9];
defaultoptionsfield = [of_visible,of_ininsert,of_inupdate,of_inwhere];
FieldTypetoVariantMap : array[TFieldType] of Integer = (varError, varOleStr, varSmallint, varInteger, varSmallint, varBoolean, varDouble, varCurrency, varCurrency, varDate, varDate, varDate, varOleStr, varOleStr, varInteger, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varError, varOleStr, varOleStr, varError, varError, varError, varError, varError, varOleStr, varOleStr, varVariant, varUnknown, varDispatch, varOleStr, varOleStr, varDouble, varOleStr,varOleStr);
Fieldtypenames : Array [TFieldType] of String[15] = ( 'Unknown', 'String', 'Smallint', 'Integer', 'Word', 'Boolean', 'Float', 'Currency', 'BCD', 'Date', 'Time', 'DateTime', 'Bytes', 'VarBytes', 'AutoInc', 'Blob', 'Memo', 'Graphic', 'FmtMemo', 'ParadoxOle', 'DBaseOle', 'TypedBinary', 'Cursor', 'FixedChar', 'WideString', 'Largeint', 'ADT', 'Array', 'Reference', 'DataSet', 'OraBlob', 'OraClob', 'Variant', 'Interface', 'IDispatch', 'Guid', 'TimeStamp', 'FMTBcd', 'FixedWideChar', 'WideMemo' );
DefaultFieldClasses : Array [TFieldType] of TFieldClass = ( Tfield, TStringField, TSmallIntField, TLongintField, TWordField, TBooleanField, TFloatField, TCurrencyField, TBCDField, TDateField, TTimeField, TDateTimeField, TBytesField, TVarBytesField, TAutoIncField, TBlobField, TMemoField, TGraphicField, TBlobField, TBlobField, TBlobField, TBlobField, Nil, TStringField, TWideStringField, TLargeIntField, Nil, Nil, Nil, Nil, TBlobField, TMemoField, TVariantField, Nil, Nil, TGuidField, Nil, TFMTBCDField, TWideStringField, TWideMemoField );
dsEditModes = [dsEdit, dsInsert, dsSetKey];
dsWriteModes = [dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsInternalCalc];

Description

Functions and Procedures

Procedure DatabaseError(Const Msg : String); overload;

This item has no description.

Procedure DatabaseError(Const Msg : String; Comp : TComponent); overload;

This item has no description.

Procedure DatabaseErrorFmt(Const Fmt : String; Args : Array Of Const); overload;

This item has no description.

Procedure DatabaseErrorFmt(Const Fmt : String; Args : Array Of const; Comp : TComponent); overload;

This item has no description.

Function ExtractFieldName(Const Fields: String; var Pos: Integer): String;

This item has no description.

Function DateTimeRecToDateTime(DT: TFieldType; Data: TDateTimeRec): TDateTime;

This item has no description.

Function DateTimeToDateTimeRec(DT: TFieldType; Data: TDateTime): TDateTimeRec;

This item has no description.

procedure DisposeMem(var Buffer; Size: Integer);

This item has no description.

function BuffersEqual(Buf1, Buf2: Pointer; Size: Integer): Boolean;

This item has no description.

function SkipComments(var p: PChar; EscapeSlash, EscapeRepeat : Boolean) : boolean;

This item has no description.

Types

LargeInt = Int64;

This item has no description.

PLargeInt= ˆLargeInt;

This item has no description.

TStringFieldBuffer = Array[0..dsMaxStringSize] of Char;

This item has no description.

TDataSetState = (...);

This item has no description.

Values
  • dsInactive
  • dsBrowse
  • dsEdit
  • dsInsert
  • dsSetKey
  • dsCalcFields
  • dsFilter
  • dsNewValue
  • dsOldValue
  • dsCurValue
  • dsBlockRead
  • dsInternalCalc
  • dsOpening
TDataEvent = (...);

This item has no description.

Values
  • deFieldChange
  • deRecordChange
  • deDataSetChange
  • deDataSetScroll
  • deLayoutChange
  • deUpdateRecord
  • deUpdateState
  • deCheckBrowseMode
  • dePropertyChange
  • deFieldListChange
  • deFocusControl
  • deParentScroll
  • deConnectChange
  • deReconcileError
  • deDisabledStateChange
TUpdateStatus = (...);

This item has no description.

Values
  • usUnmodified
  • usModified
  • usInserted
  • usDeleted
TUpdateStatusSet = SET OF TUpdateStatus;

This item has no description.

TUpdateMode = (...);

This item has no description.

Values
  • upWhereAll
  • upWhereChanged
  • upWhereKeyOnly
TResolverResponse = (...);

This item has no description.

Values
  • rrSkip
  • rrAbort
  • rrMerge
  • rrApply
  • rrIgnore
TFieldClass = class of TField;

This item has no description.

TFieldType = (...);

This item has no description.

Values
  • ftUnknown
  • ftString
  • ftSmallint
  • ftInteger
  • ftWord
  • ftBoolean
  • ftFloat
  • ftCurrency
  • ftBCD
  • ftDate
  • ftTime
  • ftDateTime
  • ftBytes
  • ftVarBytes
  • ftAutoInc
  • ftBlob
  • ftMemo
  • ftGraphic
  • ftFmtMemo
  • ftParadoxOle
  • ftDBaseOle
  • ftTypedBinary
  • ftCursor
  • ftFixedChar
  • ftWideString
  • ftLargeint
  • ftADT
  • ftArray
  • ftReference
  • ftDataSet
  • ftOraBlob
  • ftOraClob
  • ftVariant
  • ftInterface
  • ftIDispatch
  • ftGuid
  • ftTimeStamp
  • ftFMTBcd
  • ftFixedWideChar
  • ftWideMemo
TFieldMap = array[TFieldType] of Byte;

This item has no description.

TDateTimeAlias = type TDateTime;

This item has no description.

PDateTimeRec = ˆTdateTimeRec;

This item has no description.

TFieldAttribute = (...);

This item has no description.

Values
  • faHiddenCol
  • faReadonly
  • faRequired
  • faLink
  • faUnNamed
  • faFixed
TFieldAttributes = set of TFieldAttribute;

This item has no description.

TFieldKind = (...);

This item has no description.

Values
  • fkData
  • fkCalculated
  • fkLookup
  • fkInternalCalc
TFieldKinds = Set of TFieldKind;

This item has no description.

TProviderFlag = (...) deprecated;

Warning: this symbol is deprecated.

This item has no description.

Values
  • pfInUpdate
  • pfInWhere
  • pfInKey
  • pfHidden
TProviderFlags = set of TProviderFlag deprecated;

Warning: this symbol is deprecated.

This item has no description.

optionfieldty = (...);

This item has no description.

Values
  • of_readonly
  • of_required
  • of_visible
  • of_filter
  • of_filtermin
  • of_filtermax
  • of_find
  • of_initinsert
  • of_initcopy
  • of_nocopyrecord
  • of_nomodified
  • of_ininsert
  • of_inupdate
  • of_inwhere
  • of_inkey
  • of_hidden
  • of_refreshinsert
  • of_refreshupdate
  • of_user0
  • of_user1
  • of_user2
  • of_user3
  • of_user4
  • of_user5
  • of_user6
  • of_user7
optionsfieldty = set of optionfieldty;

This item has no description.

TFieldNotifyEvent = procedure(Sender: TField) of object;

This item has no description.

TFieldGetTextEvent = procedure(Sender: TField; var aText: string; DisplayText: Boolean) of object;

This item has no description.

TFieldSetTextEvent = procedure(Sender: TField; const aText: string) of object;

This item has no description.

TFieldRef = ˆTField;

This item has no description.

TFieldChars = set of Char;

This item has no description.

PLookupListRec = ˆTLookupListRec;

This item has no description.

fielddataenteredeventty = procedure(const sender: tfield; const editobj: tobject) of object;

This item has no description.

integerfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: int32; var accept: boolean) of object;

This item has no description.

int64fieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: int64; var accept: boolean) of object;

This item has no description.

bcdfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: currency; var accept: boolean) of object;

This item has no description.

floatfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: flo64; var accept: boolean) of object;

This item has no description.

datetimefieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: tdatetime; var accept: boolean) of object;

This item has no description.

booleanfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: boolean; var accept: boolean) of object;

This item has no description.

msestringfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: msestring; var accept: boolean) of object;

This item has no description.

ansistringfieldsetvalueeventty = procedure(const sender: tfield; const editobj: tobject; var avalue: ansistring; var accept: boolean) of object;

This item has no description.

TBlobStreamMode = (...);

This item has no description.

Values
  • bmRead
  • bmWrite
  • bmReadWrite
TBlobType = ftBlob..ftWideMemo;

This item has no description.

TIndexOption = (...);

This item has no description.

Values
  • ixPrimary
  • ixUnique
  • ixDescending
  • ixCaseInsensitive
  • ixExpression
  • ixNonMaintained
TIndexOptions = set of TIndexOption;

This item has no description.

TBlobData = AnsiString;

This item has no description.

TParamBinding = array of integer;

This item has no description.

TParamType = (...);

This item has no description.

Values
  • ptUnknown
  • ptInput
  • ptOutput
  • ptInputOutput
  • ptResult
TParamTypes = set of TParamType;

This item has no description.

TParamStyle = (...);

This item has no description.

Values
  • psInterbase
  • psPostgreSQL
  • psSimulated
blobkindty = (...);

This item has no description.

Values
  • bk_none
  • bk_binary
  • bk_text
TBookmark = Pointer;

This item has no description.

TBookmarkStr = string;

This item has no description.

PBookmarkFlag = ˆTBookmarkFlag;

This item has no description.

TBookmarkFlag = (...);

This item has no description.

Values
  • bfCurrent
  • bfBOF
  • bfEOF
  • bfInserted
TRecordBufferBaseType = AnsiChar;

This item has no description.

TRecordBuffer = PAnsiChar;

This item has no description.

PBufferList = ˆTBufferList;

This item has no description.

TBufferList = array[0..dsMaxBufferCount - 1] of TRecordBuffer;

This item has no description.

TBufferArray = ˆTRecordBuffer;

This item has no description.

bufferaty = array[0..1] of trecordbuffer;

This item has no description.

pbufferaty = ˆbufferaty;

This item has no description.

TGetMode = (...);

This item has no description.

Values
  • gmCurrent
  • gmNext
  • gmPrior
TGetResult = (...);

This item has no description.

Values
  • grOK
  • grBOF
  • grEOF
  • grError
TResyncMode = set of (rmExact, rmCenter);

This item has no description.

TDataAction = (...);

This item has no description.

Values
  • daFail
  • daAbort
  • daRetry
TUpdateAction = (...);

This item has no description.

Values
  • uaFail
  • uaAbort
  • uaSkip
  • uaRetry
  • uaApplied
TUpdateKind = (...);

This item has no description.

Values
  • ukModify
  • ukInsert
  • ukDelete
TLocateOption = (...);

This item has no description.

Values
  • loCaseInsensitive
  • loPartialKey
TLocateOptions = set of TLocateOption;

This item has no description.

TDataOperation = procedure of object;

This item has no description.

TDataSetNotifyEvent = procedure(DataSet: TDataSet) of object;

This item has no description.

TDataSetErrorEvent = procedure(DataSet: TDataSet; E: EDatabaseError; var DataAction: TDataAction) of object;

This item has no description.

TFilterOption = (...);

This item has no description.

Values
  • foCaseInsensitive
  • foNoPartialCompare
TFilterOptions = set of TFilterOption;

This item has no description.

TFilterRecordEvent = procedure(DataSet: TDataSet; var Accept: Boolean) of object;

This item has no description.

TDatasetClass = Class of TDataset;

This item has no description.

TPSCommandType = (...);

This item has no description.

Values
  • ctUnknown
  • ctQuery
  • ctTable
  • ctStoredProc
  • ctSelect
  • ctInsert
  • ctUpdate
  • ctDelete
  • ctDDL
datasetinternalstatety = (...);

This item has no description.

Values
  • dsis_checkingbrowsemode
  • dsis_refreshing
  • dsis_recordcopy
datasetinternalstatesty = set of datasetinternalstatety;

This item has no description.

TDataChangeEvent = procedure(Sender: TObject; Field: TField) of object;

This item has no description.

ifistatechangedeventty = procedure(const sender: tdatasource; const alink: tdatalink; const aclient: iificlient; const astate: ifiwidgetstatesty) of object;

This item has no description.

TDBDatasetClass = Class of TDBDataset;

This item has no description.

TDBTransactionClass = Class of TDBTransaction;

This item has no description.

TLoginEvent = procedure(Sender: TObject; Username, Password: string) of object;

This item has no description.

TDatabaseClass = Class Of TDatabase;

This item has no description.

Constants

dsMaxBufferCount = MAXINT div 8;

This item has no description.

dsMaxStringSize = 8192;

This item has no description.

YesNoChars : Array[Boolean] of char = ('N', 'Y');

This item has no description.

SQLDelimiterCharacters = [';',',',' ','(',')',#13,#10,#9];

This item has no description.

defaultoptionsfield = [of_visible,of_ininsert,of_inupdate,of_inwhere];

This item has no description.

FieldTypetoVariantMap : array[TFieldType] of Integer = (varError, varOleStr, varSmallint, varInteger, varSmallint, varBoolean, varDouble, varCurrency, varCurrency, varDate, varDate, varDate, varOleStr, varOleStr, varInteger, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varOleStr, varError, varOleStr, varOleStr, varError, varError, varError, varError, varError, varOleStr, varOleStr, varVariant, varUnknown, varDispatch, varOleStr, varOleStr, varDouble, varOleStr,varOleStr);

This item has no description.

Fieldtypenames : Array [TFieldType] of String[15] = ( 'Unknown', 'String', 'Smallint', 'Integer', 'Word', 'Boolean', 'Float', 'Currency', 'BCD', 'Date', 'Time', 'DateTime', 'Bytes', 'VarBytes', 'AutoInc', 'Blob', 'Memo', 'Graphic', 'FmtMemo', 'ParadoxOle', 'DBaseOle', 'TypedBinary', 'Cursor', 'FixedChar', 'WideString', 'Largeint', 'ADT', 'Array', 'Reference', 'DataSet', 'OraBlob', 'OraClob', 'Variant', 'Interface', 'IDispatch', 'Guid', 'TimeStamp', 'FMTBcd', 'FixedWideChar', 'WideMemo' );

This item has no description.

DefaultFieldClasses : Array [TFieldType] of TFieldClass = ( Tfield, TStringField, TSmallIntField, TLongintField, TWordField, TBooleanField, TFloatField, TCurrencyField, TBCDField, TDateField, TTimeField, TDateTimeField, TBytesField, TVarBytesField, TAutoIncField, TBlobField, TMemoField, TGraphicField, TBlobField, TBlobField, TBlobField, TBlobField, Nil, TStringField, TWideStringField, TLargeIntField, Nil, Nil, Nil, Nil, TBlobField, TMemoField, TVariantField, Nil, Nil, TGuidField, Nil, TFMTBCDField, TWideStringField, TWideMemoField );

This item has no description.

dsEditModes = [dsEdit, dsInsert, dsSetKey];

This item has no description.

dsWriteModes = [dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsInternalCalc];

This item has no description.

Generated by PasDoc 0.17.0.snapshot.