Browse Source

- TIndexDefs.Destroy now calls inhedited.Destroy

joost 20 years ago
parent
commit
fcf91ea4fe
1 changed files with 5 additions and 3 deletions
  1. 5 3
      fcl/db/db.pp

+ 5 - 3
fcl/db/db.pp

@@ -1719,7 +1719,6 @@ end;
 destructor TIndexDef.Destroy;
 destructor TIndexDef.Destroy;
 
 
 begin
 begin
-  //!! To be implemented
   inherited Destroy;
   inherited Destroy;
 end;
 end;
 
 
@@ -1748,7 +1747,7 @@ end;
 destructor TIndexDefs.Destroy;
 destructor TIndexDefs.Destroy;
 
 
 begin
 begin
-  //!! To be implemented
+  inherited Destroy;
 end;
 end;
 
 
 Function TIndexDefs.AddIndexDef: TIndexDef;
 Function TIndexDefs.AddIndexDef: TIndexDef;
@@ -1910,7 +1909,10 @@ end.
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.46  2005-04-10 22:18:43  joost
+  Revision 1.47  2005-04-13 22:09:15  joost
+  - TIndexDefs.Destroy now calls inhedited.Destroy
+
+  Revision 1.46  2005/04/10 22:18:43  joost
   Patch from Alexandrov Alexandru
   Patch from Alexandrov Alexandru
   - implemented TDataset.BindFields
   - implemented TDataset.BindFields
   - master-detail relation implemented
   - master-detail relation implemented