소스 검색

* call library handler function directly

git-svn-id: trunk@13982 -
ivost 16 년 전
부모
커밋
4a7f3de318
1개의 변경된 파일4개의 추가작업 그리고 4개의 파일을 삭제
  1. 4 4
      packages/sqlite/src/sqlite3.inc

+ 4 - 4
packages/sqlite/src/sqlite3.inc

@@ -13,8 +13,8 @@ interface
 
 
 uses
 uses
   ctypes, dynlibs;
   ctypes, dynlibs;
-{$IFDEF LOAD_DYNAMICALLY}
-{$ELSE}
+
+{$IFNDEF LOAD_DYNAMICALLY}
   {$IFDEF darwin}
   {$IFDEF darwin}
     {$linklib sqlite3}
     {$linklib sqlite3}
   {$ENDIF}
   {$ENDIF}
@@ -5729,7 +5729,7 @@ var
 function InitialiseSqlite: Integer; deprecated;
 function InitialiseSqlite: Integer; deprecated;
 function InitialiseSqlite(const LibraryName: String): Integer; deprecated;
 function InitialiseSqlite(const LibraryName: String): Integer; deprecated;
 function TryInitialiseSqlite(const LibraryName: string): Integer; deprecated;
 function TryInitialiseSqlite(const LibraryName: string): Integer; deprecated;
-{$ENDIF LOAD_DYNAMICALLY}
+{$ENDIF}
 
 
 implementation
 implementation
 
 
@@ -5912,7 +5912,7 @@ end;
 
 
 function InitializeSqlite: Integer;
 function InitializeSqlite: Integer;
 begin
 begin
-  Result := InitializeSqlite(sqlite3lib);
+  Result := InitializeLibrary(SqliteLibrary, sqlite3lib);
 end;
 end;
 
 
 function InitializeSqlite(const LibraryName: String): Integer;
 function InitializeSqlite(const LibraryName: String): Integer;