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

sqldblaz: added TMySQL80Connection

Browse Source 
git-svn-id: trunk@64598 -
This commit is contained in:
mattias 2021-02-17 13:15:58 +00:00
parent a59e2ba10d
commit 531da16b59
3 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/sqldb/design/registersqldb.txt
View File

@ -31,6 +31,9 @@ tmysql56connection_200.png
tmysql57connection.png
tmysql57connection_150.png
tmysql57connection_200.png
tmysql80connection.png
tmysql80connection_150.png
tmysql80connection_200.png
tmysqlconnection.png
tmysqlconnection_150.png
tmysqlconnection_200.png

10
components/sqldb/registersqldb.pas
View File

@ -60,6 +60,10 @@ unit registersqldb;
{$IF FPC_FULLVERSION >= 20701}
{$DEFINE HASMYSQL57CONNECTION}
{$ENDIF}
{$IF FPC_FULLVERSION >= 30302}
// ToDo: set to 30301 when https://bugs.freepascal.org/view.php?id=38501 is applied
{$DEFINE HASMYSQL80CONNECTION}
{$ENDIF}
interface
@ -97,6 +101,9 @@ uses
{$IFDEF HASMYSQL57CONNECTION}
mysql57conn,
{$ENDIF}
{$IFDEF HASMYSQL80CONNECTION}
mysql80conn,
{$ENDIF}
{$IFDEF HASSQLITE3CONNECTION}
sqlite3conn,
{$ENDIF}
@ -268,6 +275,9 @@ begin
{$IFDEF HASMYSQL57CONNECTION}
,TMySQL57Connection
{$ENDIF}
{$IFDEF HASMYSQL80CONNECTION}
,TMySQL80Connection
{$ENDIF}
{$IFDEF HASSQLITE3CONNECTION}
,TSQLite3Connection
{$ENDIF}

BIN
components/sqldb/registersqldb.res
View File

Binary file not shown.