I don't understand what you are doing here. All I want is access to MariaDB. I beleive it is using mysql80conn.
Terry On Mon, 2021-09-20 at 09:38 +0200, Luca Olivetti via lazarus wrote: > El 19/9/21 a les 23:39, Terry A. Haimann via lazarus ha escrit: > > I just bought a new laptop and tring to set up Lazarus. The > > problem is > > installing ZeosDBO into Lazarus. > > This is the version of zeosdbo I have installed, both under windows > and > linux (I don't know if I should use any later or previous version, > this > one seems to be working fine for my projects): > > $ svn info > Path: . > Working Copy Root Path: /home/luca/Datos/lazextra/zeosdbo/7.2-patches > URL: https://svn.code.sf.net/p/zeoslib/code-0/branches/7.2-patches > Relative URL: ^/branches/7.2-patches > Repository Root: https://svn.code.sf.net/p/zeoslib/code-0 > Repository UUID: d681b350-854c-439c-a81d-c0ce20710203 > Revision: 5601 > Node Kind: directory > Schedule: normal > Last Changed Author: egonhugeist > Last Changed Rev: 5597 > Last Changed Date: 2019-04-18 21:29:12 +0200 (dj., 18 d’abr. 2019) > > > I have a local patch applied but it's only for postgresql > > $ svn diff > Index: src/dbc/ZDbcPostgreSql.pas > =================================================================== > --- src/dbc/ZDbcPostgreSql.pas (revision 5601) > +++ src/dbc/ZDbcPostgreSql.pas (working copy) > @@ -566,6 +566,12 @@ > if Info.Values['sslrootcert'] <> '' then > AddParamToResult('sslrootcert', Info.Values['sslrootcert']); > if Info.Values['sslcrl'] <> '' then AddParamToResult('sslcrl', > Info.Values['sslcrl']); > > + { tcp keepalives } > + if Info.Values['keepalives'] <> '' then > AddParamToResult('keepalives',Info.Values['keepalives']); > + if Info.Values['keepalives_idle'] <> '' then > AddParamToResult('keepalives_idle',Info.Values['keepalives_idle']); > + if Info.Values['keepalives_interval'] <> '' then > AddParamToResult('keepalives_interval',Info.Values['keepalives_interv > al']); > + if Info.Values['keepalives_count'] <> '' then > AddParamToResult('keepalives_count',Info.Values['keepalives_count']); > + > { Sets a connection timeout. } > ConnectTimeout := StrToIntDef(Info.Values['timeout'], -1); > if ConnectTimeout >= 0 then > @@ -1083,7 +1089,7 @@ > DriverManager.LogMessage(lcTransaction, > ConSettings^.Protocol, > cCommit); > PError := > FPlainDriver.GetResultErrorField(QueryHandle,PG_DIAG_SQLSTATE); > //transaction aborted and in postre zombi status? If so a > rollback is required > - if (ZSysUtils.ZMemLComp(PError, > current_transaction_is_aborted, > 5) = 0) then begin > + if (PError<>nil) and (Perror^ <> #0) and > (ZSysUtils.ZMemLComp(PError, current_transaction_is_aborted, 5) = 0) > then begin > FPlainDriver.PQclear(QueryHandle); > QueryHandle := FPlainDriver.ExecuteQuery(FHandle, > Pointer(cRollback)); > end; > > > Bye > -- > Luca Olivetti > Wetron Automation Technology http://www.wetron.es/ > Tel. +34 93 5883004 (Ext.3010) Fax +34 93 5883007 -- _______________________________________________ lazarus mailing list [email protected] https://lists.lazarus-ide.org/listinfo/lazarus
