DebuterExportation

Description...
Exemple...
Note...
Voir aussi...
Traduction...

Procedure Habilitation DebuterExportation(Ecrire : Procedure(B : Binaire))

La procédure DebuterExportation prépare la tâche courante à réaliser une exportation. Tous les objets exportés sont archivés récursivement. L'archive est découpée en buffers qui sont passés à la procédure Ecrire dans l'ordre de leur constitution. La procédure Ecrire est chargée de réaliser le stockage de l'exportation dans un fichier, une base de données, etc.

Pour exporter un objet et toute sa descendance, il suffit d'appeler la procédure Exporter du type Objet.

Revenir en haut de la page...

Variable Procedure EcrireFichier(B : Binaire)
/* Realise l'exportation dans un fichier. */
Debut
F.Lire(B);
Fin Procedure

Principal
Variable Debut
A="Bonjour le monde";
B=10;
C=3.1416;
D=Vrai;
F=Fichier("c:/tmp/export.dmp", EcritureBinaire);
DebuterExportation(EcrireFichier);
A.Exporter();
ExporterEntier(B);
ExporterReel(C);
ExporterEnumere(D);
TerminerExportation();
Fin Principal

Revenir en haut de la page...

L'archive constituée est indépendante de la plate-forme. Elle peut donc être exploitée par un autre programme s'exécutant sur une autre plate-forme.

Revenir en haut de la page...

TerminerExportation pour terminer l'exportation.

Revenir en haut de la page...

ExportAnfangenBeginExportation开始出口ComenzarExportacion----

Revenir en haut de la page...