paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-02 13:19:49 +01:00
Code Issues Packages Projects Releases Wiki Activity

sqldb package: added TOracleConnection to component palette

Browse Source 
git-svn-id: trunk@10100 -
This commit is contained in:
mattias 2006-10-23 10:22:16 +00:00
parent b38f796623
commit 6e6d0962de
1 changed files with 7 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
components/sqldb/registersqldb.pas
View File

@ -18,24 +18,21 @@
unit registersqldb;
{$mode objfpc}{$H+}
{$IFNDEF ver2_0_0}{$IFNDEF ver2_0_1}
{$DEFINE HASODBCCONNECTION}
{$ENDIF}{$ENDIF}
{$IFNDEF ver2_0_0}{$IFNDEF ver2_0_1}{$IFNDEF ver2_0_2}{$IFNDEF ver2_0_3}
{$DEFINE HASODBCCONNECTION}
{$IFNDEF ver2_0_2}{$IFNDEF ver2_0_3}
{$DEFINE HASMYSQL50CONNECTION}
{$ENDIF}{$ENDIF}{$ENDIF}{$ENDIF}
{$DEFINE HASORACLECONNECTION}
{$ENDIF}{$ENDIF}
interface
uses
Classes, SysUtils, LResources, sqldb, ibconnection, pqconnection,
oracleconnection, odbcconn,
{$IFDEF HASMYSQL50CONNECTION}
mysql40conn, mysql41conn, mysql50conn,
{$ELSE}
mysql4conn,
{$ENDIF}
{$IFDEF HASODBCCONNECTION}
odbcconn,
{$ENDIF}
LazarusPackageIntf;
@ -48,8 +45,9 @@ begin
RegisterComponents('SQLdb',[TSQLQuery,
TSQLTransaction,
TIBConnection,
{$IFDEF HASODBCCONNECTION}
TODBCConnection,
{$IFDEF HASORACLECONNECTION}
TOracleConnection,
{$ENDIF}
{$IFDEF HASMYSQL50CONNECTION}
TMySQL40Connection,