Bases de données client serveur Interbase
V.2.2. Création des tables
V.2.2.1. Principe
Nous allons créer une table contenant pour chaque formation :
? Un code, par exemple 3 ;
? Un Nom, par exemple « Delphi Interbase » ;
? Un nombre de jours par exemple 3.
? Un prix par exemple 15.000,00 DA.

Pour cela nous devons envoyer une requête de création en langage SQL vers le serveur Interbase, la syntaxe est la suivante :
CREATE TABLE formations
(f-numero INTEGER, f -nom CHARACTER (30), f-jours INTEGER, f-P r i x N U M E R I C ( 5 , 2 ) ) ;

Il suffit donc de choisir un no m de la table, et le nom de chaque colonne avec son type. Parmi les types autorisés par Interbase :
? INTEGER pour les valeurs entières 32 bits.
? SMALLINT pour les valeurs entières 16 bits.
? Numeric (décimales, précision) pour une valeur numérique Flottante.
? Date pour une date.
? CHARACTER (taille) pour des caractères.

Pour envoyer cette requête vers le serveur :
? Nous utilisons un TIBDatabase qui assura la connexion vers le serveur.
? Nous utilisons un TIBQuery.
? Nous le relions à TIBDatabase.
? Nous plaçons la

requête SQL dans sa propriété TIBQuery.SQL via l’inspecteur d’objets ou par code.

? Nous exécutons la requête par TIBQuery.ExecSql.

Remarque :
La création n’est visible par tout le monde que si la transaction qui est utilisée pour la création de la table est confirmée.

Samirboualam@HOTMAIL.COM®

®

14

Septembre 2004

Bases de données client serveur Interbase
V.2.2.2. Utilisation de SQL
La requête à envoyer au serveur est placée dans TIBQuery.Sql.
IBQuery1.SQL.Clear ;
IBQuery1.SQL.ADD( ‘ CREATE TABLE formations
(f-numero INTEGER, f -nom CHARACTER (30), f-jours INTEGER, f- Prix NUMERIC (5,2)) ’)

Pour construire la requête, on peut utiliser Add, ou même LoadFromFile pour lire un fichier texte ( .txt) contenant la requête :
IbQuery1.Sql.LoadFromFile ( ‘Cree-formations.txt’) ;

Nous pouvons entrer la requête en utilisant