paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-06 19:00:40 +01:00
Code Issues Packages Projects Releases Wiki Activity

enabled mysql 4.1 and 5.0 support for fpc 2.1.1 from Joost

Browse Source 
git-svn-id: trunk@8212 -
This commit is contained in:
vincents 2005-11-22 15:25:51 +00:00
parent 3b444c3425
commit 7282d47a81
1 changed files with 17 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
components/sqldb/registersqldb.pas
View File

@ -21,11 +21,19 @@ unit registersqldb;
{$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 HASMYSQL50CONNECTION}
{$ENDIF}{$ENDIF}{$ENDIF}{$ENDIF}
interface
uses
Classes, SysUtils, LResources, sqldb, ibconnection, pqconnection, mysql4conn,
Classes, SysUtils, LResources, sqldb, ibconnection, pqconnection,
{$IFDEF HASMYSQL50CONNECTION}
mysql40conn, mysql41conn, mysql50conn,
{$ELSE}
mysql4conn,
{$ENDIF}
{$IFDEF HASODBCCONNECTION}
odbcconn,
{$ENDIF}
@ -43,9 +51,14 @@ begin
{$IFDEF HASODBCCONNECTION}
TODBCConnection,
{$ENDIF}
TPQConnection,
TMySQLConnection]);
{$IFDEF HASMYSQL50CONNECTION}
TMySQL40Connection,
TMySQL41Connection,
TMySQL50Connection,
{$ELSE}
TMySQLConnection,
{$ENDIF}
TPQConnection]);
end;
procedure Register;