Description...
Exemple...
Voir aussi...
Traduction...
Procedure ExporterEnumere(E:Entier)
Variable
F:Fichier;
Procedure EcrireFichier(B : Binaire)
/* Realise l'exportation dans un fichier. */
Debut
F.Lire(B);
Fin Procedure
Principal
Variable
A:Caractere;
B:Entier;
C:Reel;
D:Booleen;
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
ExporteurAufgezahlterWert | ExporterEnumeratedValue | 出口列举 | ExportarEnumerado | - | - | - | - |