Description...
Exemple...
Voir aussi...
Traduction...
Procedure ExporterEntier(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
GanzzahlExport | ExportInteger | 出口整数 | ExportarNumeroEntero | - | - | - | - |