paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-03 13:58:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

SQLDB: Improve TOracleConnection. Issue #31343, patch from LacaK.

Browse Source 
git-svn-id: trunk@54131 -
This commit is contained in:
juha 2017-02-09 10:47:57 +00:00
parent d5791ad833
commit 5545ac0d43
1 changed files with 11 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
components/sqldb/registersqldb.pas
View File

@ -25,33 +25,17 @@
unit registersqldb;
{$mode objfpc}{$H+}
{$IFNDEF win64}
{$DEFINE HASMYSQL4CONNECTION}
{$DEFINE HASORACLECONNECTION}
{$DEFINE HASSQLITE3CONNECTION}
{$ENDIF}
{$IF FPC_FULLVERSION>=20602}
{$DEFINE HASSQLITE3CONNECTION} // Include for win64, if fpc > 2.6.2
{$ENDIF}
{$IF FPC_FULLVERSION>= 20601}
{$DEFINE HASPQCONNECTION}
{$ELSE}
{$IFNDEF win64}
{$DEFINE HASPQCONNECTION}
{$ENDIF}
{$ENDIF}
{$IF FPC_FULLVERSION>= 20601}
{$DEFINE HASMYSQL55CONNECTION}
{$IF DEFINED(BEOS) OR DEFINED(HAIKU) OR DEFINED(LINUX) OR DEFINED(FREEBSD) OR DEFINED (NETBSD) OR DEFINED(OPENBSD) OR DEFINED(WIN32) OR DEFINED(WIN64)}
// MS SQL Server and Sybase ASE connectors were introduced in the FPC 2.7 development branch,
// and backported to 2.6.1. Operating systems should match FPC packages\fcl-db\fpmake.pp
{$DEFINE HASIBCONNECTION}
{$DEFINE HASMSSQLCONNECTION}
{$DEFINE HASMYSQL55CONNECTION}
{$DEFINE HASORACLECONNECTION}
{$DEFINE HASPQCONNECTION}
{$DEFINE HASSQLITE3CONNECTION}
{$DEFINE HASSYBASECONNECTION}
{$ENDIF}
{$IFNDEF win64}
{$DEFINE HASMYSQL4CONNECTION}
{$ENDIF}
{$IF FPC_FULLVERSION >= 20602}
@ -62,18 +46,13 @@ unit registersqldb;
{$DEFINE HASLIBLOADER}
{$ENDIF}
{$IF FPC_FULLVERSION>= 20603}
{$IF FPC_FULLVERSION >= 20603}
{$DEFINE HASMYSQL56CONNECTION}
{$ENDIF}
{$IF FPC_FULLVERSION>= 20701}
{$IF FPC_FULLVERSION >= 20701}
{$DEFINE HASMYSQL57CONNECTION}
{$ENDIF}
{ IFNDEF Solaris}
// Reflects missing fcl-db support around FPC 2.6.1.
{$DEFINE HASIBCONNECTION}
{ ENDIF}
interface
uses
@ -99,7 +78,7 @@ uses
{$IFDEF HASMYSQL4CONNECTION}
mysql40conn, mysql41conn,
{$ENDIF}
mysql50conn,
mysql50conn,
mysql51conn,
{$IFDEF HASMYSQL55CONNECTION}
mysql55conn,