The attached file is a small patch for testsqldb.pp located at /fpc/trunk/packages/fcl-db/sqldb/
The patch adds sqlite3 database to the example. P.S.: This is the only way to send a patch? Leonardo M. Ramé http://leonardorame.blogspot.com ____________________________________________________________________________________ Get easy, one-click access to your favorites. Make Yahoo! your homepage. http://www.yahoo.com/r/hs
Index: testsqldb.pp =================================================================== --- testsqldb.pp (revision 9259) +++ testsqldb.pp (working copy) @@ -24,6 +24,7 @@ pqconnection, mysql4conn, IBConnection, + sqlite3conn, sqldb; var connection : tSQLConnection; @@ -37,6 +38,7 @@ if dbtype = 'mysql' then connection := tMySQLConnection.Create(nil); if dbtype = 'postgresql' then connection := tpqConnection.Create(nil); if dbtype = 'interbase' then connection := tIBConnection.Create(nil); + if dbtype = 'sqlite3' then connection := tSQLite3Connection.Create(nil); if not assigned(connection) then exit; // probably an invalid database type given
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
