Difference between revisions of "TSQLite3Connection/fr"
(Created page with "{{TSQLite3Connection}} {{Infobox databases/fr}} {{Note| Au lieu d'utiliser un TMySQLite3Connection, un simili-proxy TSQLConnector peut être utilisé pou...") |
|||
Line 4: | Line 4: | ||
{{Note| Au lieu d'utiliser un TMySQLite3Connection, un simili-proxy [[TSQLConnector/fr|TSQLConnector]] peut être utilisé pour créer des applications de bases de données plus génériques.}} | {{Note| Au lieu d'utiliser un TMySQLite3Connection, un simili-proxy [[TSQLConnector/fr|TSQLConnector]] peut être utilisé pour créer des applications de bases de données plus génériques.}} | ||
'''TSQLite3Connection''' [[image:tsqlite3connection.png]] est le composant de connexion pour l'utilisation de [[SQLite/fr|SQLite]]. Le composant se trouve dans l'[[SQLdb tab/fr|onglet SQLdb]] de la [[Component Palette/fr|palette de composants]]. | '''TSQLite3Connection''' [[image:tsqlite3connection.png]] est le composant de connexion pour l'utilisation de [[SQLite/fr|SQLite]]. Le composant se trouve dans l'[[SQLdb tab/fr|onglet SQLdb]] de la [[Component Palette/fr|palette de composants]]. | ||
+ | |||
+ | TSQLite3connection est un composant, non visuel de la FCL et non pas de la LCL, ce qui veut dire qu'il peut être aussi utilisé dans des applications TSQLite3connection console p.ex.tout comme dans les applications Lazarus avec IHM. Malheureusement il n'y a pas de docs FCL sur TSQLite3Connection mais son interface est similaire à son parent ([[TSQLConnection/fr|TSQLConnection]]). Comme SQLite est est une base de données embarquée (i.e. sans serveur), son utilisation peut ne pas demander de définir .host, .username ni .password. L'exemple ci-dessous illustre la façon de l'utiliser dans un programme ObjectPascal, utilisé dans Lazarus un réglage similaire peut etre réalisé dans l'inspecteur d'objet. | ||
+ | |||
+ | <syntaxhighlight> | ||
+ | program BasicDBase; | ||
+ | {$mode objfpc} {$ifdef mswindows}{$apptype console}{$endif} | ||
+ | uses | ||
+ | sqldb, sqlite3conn; | ||
+ | var | ||
+ | Connect : TSQLite3Connection; | ||
+ | Trans : TSQLTransaction; | ||
+ | |||
+ | begin | ||
+ | Connect := TSQLite3Connection.Create(nil); | ||
+ | try | ||
+ | Trans := TSQLTransaction.Create(Connect); | ||
+ | try | ||
+ | Connect.Transaction := Trans; | ||
+ | Connect.DatabaseName := 'test_dbase'; | ||
+ | Trans.StartTransaction; // opens Connect, EInOutError if SQLite not installed | ||
+ | try | ||
+ | Connect.ExecuteDirect('create table TBLNAMES (ID integer Primary Key, NAME varchar(40));'); | ||
+ | Trans.Commit; | ||
+ | except | ||
+ | Trans.Rollback; | ||
+ | raise; | ||
+ | end; | ||
+ | finally | ||
+ | Trans.Free; | ||
+ | end; | ||
+ | finally | ||
+ | Connect.Free; | ||
+ | end; | ||
+ | end. | ||
+ | </syntaxhighlight> | ||
+ | |||
+ | La procédure ExecuteDirect() est un moyen clairement limité pour appeler SQL dans une application réelle, vous aurez besoin de quelque chose comme TSQLQuery. | ||
==Voir aussi== | ==Voir aussi== | ||
* [http://www.freepascal.org/docs-html/fcl/sqldb/tsqlconnection.html Doc. TSQLConnection] | * [http://www.freepascal.org/docs-html/fcl/sqldb/tsqlconnection.html Doc. TSQLConnection] | ||
* [[TSQLConnector/fr|TSQLConnector]] | * [[TSQLConnector/fr|TSQLConnector]] | ||
− | * [[SQLite/fr|SQLite] | + | * [[SQLite/fr|SQLite] |
− | |||
− |
Revision as of 13:21, 12 July 2017
│
English (en) │
español (es) │
français (fr) │
日本語 (ja) │
polski (pl) │
TSQLite3Connection est le composant de connexion pour l'utilisation de SQLite. Le composant se trouve dans l'onglet SQLdb de la palette de composants.
TSQLite3connection est un composant, non visuel de la FCL et non pas de la LCL, ce qui veut dire qu'il peut être aussi utilisé dans des applications TSQLite3connection console p.ex.tout comme dans les applications Lazarus avec IHM. Malheureusement il n'y a pas de docs FCL sur TSQLite3Connection mais son interface est similaire à son parent (TSQLConnection). Comme SQLite est est une base de données embarquée (i.e. sans serveur), son utilisation peut ne pas demander de définir .host, .username ni .password. L'exemple ci-dessous illustre la façon de l'utiliser dans un programme ObjectPascal, utilisé dans Lazarus un réglage similaire peut etre réalisé dans l'inspecteur d'objet.
program BasicDBase;
{$mode objfpc} {$ifdef mswindows}{$apptype console}{$endif}
uses
sqldb, sqlite3conn;
var
Connect : TSQLite3Connection;
Trans : TSQLTransaction;
begin
Connect := TSQLite3Connection.Create(nil);
try
Trans := TSQLTransaction.Create(Connect);
try
Connect.Transaction := Trans;
Connect.DatabaseName := 'test_dbase';
Trans.StartTransaction; // opens Connect, EInOutError if SQLite not installed
try
Connect.ExecuteDirect('create table TBLNAMES (ID integer Primary Key, NAME varchar(40));');
Trans.Commit;
except
Trans.Rollback;
raise;
end;
finally
Trans.Free;
end;
finally
Connect.Free;
end;
end.
La procédure ExecuteDirect() est un moyen clairement limité pour appeler SQL dans une application réelle, vous aurez besoin de quelque chose comme TSQLQuery.
Voir aussi
- Doc. TSQLConnection
- TSQLConnector
- [[SQLite/fr|SQLite]