fcl-db: sqldb: TSQLDBLibraryLoader do not check Enabled while loading component properties.

git-svn-id: trunk@37570 -

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

@@ -38,12 +38,12 @@ implementation
 Resourcestring
    SErrConnnected = 'This operation is not allowed while the datatabase is loaded';
    SErrInvalidConnectionType = 'Invalid connection type : "%s"';
+
 { TSQLDBLibraryLoader }
 
 procedure TSQLDBLibraryLoader.CheckDisabled;
-
 begin
-  If Enabled then
+  If not (csLoading in ComponentState) and Enabled then
     DatabaseError(SErrConnnected,Self);
 end;