* Fixed memory leak when re-assigning datasource property

git-svn-id: trunk@11312 -

packages/fcl-db/src/sqldb/sqldb.pp

@@ -1508,7 +1508,8 @@ begin
     If Assigned(AValue) then
       begin
       AValue.FreeNotification(Self);  
-      FMasterLink:=TMasterParamsDataLink.Create(Self);
+      If (FMasterLink=Nil) then
+        FMasterLink:=TMasterParamsDataLink.Create(Self);
       FMasterLink.Datasource:=AValue;
       end
     else