Base de données CPDB

Un article de Wikipedia.

(Différences entre les versions)
(→Initialisation)
(→Existence d'une base de données)
Ligne 27 : Ligne 27 :
Le test de l'existence d'une base de données se réalise de la manière suivante :
Le test de l'existence d'une base de données se réalise de la manière suivante :
<code pascal>
<code pascal>
 +
var bd : String;
 +
...
 +
bd = 'databaseCPDB';
 +
...
if CPDB_DatabaseExist(bd)= CPDB_ERR_NOEXIST then
if CPDB_DatabaseExist(bd)= CPDB_ERR_NOEXIST then
begin
begin

Version du 24 mars 2008 à 10:38

Sommaire

Base de données CPDB

But

Disposer d'une base de données sous Palm.

Introduction

La nécessité de pouvoir stocker des données entre deux lancements d'un programme nécessite de disposer d'une base de données.

Résultats

Le choix s'est porté sur la base de données CPDB (voir Ressources).

Préambule

Elle s'utilise en installant la base de données (voir Ressources) et en important la liaison avec Pascal (voir Ressources) via : 

{$i PalmAPI.pas}
 
{$i CPDBSTD4PP.pas}

Initialisation

L'initialisation de la librairie s'effectue au début du programme par : 

CPDB_OPENLIB;

Existence d'une base de données

Le test de l'existence d'une base de données se réalise de la manière suivante : 

var bd : String;
...
bd = 'databaseCPDB';
...
if CPDB_DatabaseExist(bd)= CPDB_ERR_NOEXIST then 
begin
 ...
end
else
begin
 ...
end;

Ouverture d'une base de données

L'ouverture d'une base de données se réalise ainsi : 

var Error : Err;
    iHandle :UInt8;
    bd : String;
...
bd = 'databaseCPDB';
...
Error:=CPDB_Open(0,bd,dmModeReadWrite,iHandle);
...

Avec les modes suivants de PalmAPI.pas

  • dmModeReadOnly
  • dmModeWrite
  • dmModeReadWrite

Terminaison

Il faut clore la librairie en utilisant la commande : 

CPDB_CLOSELIB;

Conclusions

Ressources

Récupérée de « http://zigloo.ch/index.php/Base_de_donn%C3%A9es_CPDB »