fcl-db: sqlite: call InitializeSQLite with SQLiteLibraryName (in same style like in DoInternalConnect)

to avoid exception when connection is already opened.

git-svn-id: trunk@22986 -

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

@@ -930,7 +930,7 @@ function TSQLite3Connection.GetConnectionInfo(InfoType: TConnInfoType): string;
 begin
   Result:='';
   try
-    InitializeSqlite;
+    InitializeSqlite(SQLiteLibraryName);
     case InfoType of
       citServerType:
         Result:=TSQLite3ConnectionDef.TypeName;