+ Removed TDatabase.Notification (as suggested by Martin Schreiber, bug #4468

git-svn-id: trunk@1657 -

fcl/db/database.inc

@@ -88,13 +88,6 @@ begin
     end;
 end;
 
-
-procedure TDatabase.Notification(AComponent: TComponent; Operation: TOperation);
-
-begin
-  //!! To be implemented.
-end;
-
 constructor TDatabase.Create(AOwner: TComponent);
 
 begin

fcl/db/db.pp

@@ -1402,7 +1402,6 @@ type
     Procedure CheckDisConnected;
     procedure InternalHandleException; virtual;
     procedure Loaded; override;
-    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
     Procedure DoInternalConnect; Virtual;Abstract;
     Procedure DoInternalDisConnect; Virtual;Abstract;
   public