diff options
author | nickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-04-27 23:11:09 +0000 |
---|---|---|
committer | nickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-04-27 23:11:09 +0000 |
commit | a491c935588745154b576226b73833bac78fcb6e (patch) | |
tree | 973289073fb5d21573a6be2b5cfeba9abd2a9472 /packages/fcl-db/src/base/fields.inc | |
parent | 38b5e0606069cc5985e995e1da5b6855db67f507 (diff) | |
parent | ae5b0de491a91321675f73eae5db628d068f4e05 (diff) | |
download | fpc-unicodekvm.tar.gz |
* synchronized with trunkunicodekvm
git-svn-id: https://svn.freepascal.org/svn/fpc/branches/unicodekvm@49282 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-db/src/base/fields.inc')
-rw-r--r-- | packages/fcl-db/src/base/fields.inc | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/packages/fcl-db/src/base/fields.inc b/packages/fcl-db/src/base/fields.inc index 9a94d9abed..262b331125 100644 --- a/packages/fcl-db/src/base/fields.inc +++ b/packages/fcl-db/src/base/fields.inc @@ -68,12 +68,13 @@ end; function TFieldDef.AddChild: TFieldDef; begin + // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TFieldDef.AddChild // Adds a new TFieldDef object to the ChildDefs array. end; function TFieldDef.GetChildDefs: TFieldDefs; begin - + Result:=nil; end; procedure TFieldDef.SetChildDefs(AValue: TFieldDefs); @@ -84,11 +85,13 @@ end; function TFieldDef.HasChildDefs: Boolean; begin // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TFieldDef.HasChildDefs + Result:=False; end; function TFieldDef.GetParentDef: TFieldDef; begin // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TFieldDef.ParentDef + Result:=nil; end; procedure TFieldDef.Assign(APersistent: TPersistent); @@ -3705,6 +3708,7 @@ end; function TObjectField.GetFieldCount: Integer; begin // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TObjectField.GetFieldCount + Result:=0; end; function TObjectField.GetFields: TFields; @@ -3716,6 +3720,7 @@ end; function TObjectField.GetFieldValue(AIndex: Integer): Variant; begin // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TObjectField.GetFieldValue + Result:=NULL; end; procedure TObjectField.SetFieldValue(AIndex: Integer; const AValue: Variant); @@ -3732,6 +3737,7 @@ end; function TObjectField.GetAsVariant: Variant; begin // http://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TObjectField.GetAsVariant + Result:=NULL; end; procedure TObjectField.SetVarValue(const AValue: Variant); |