FinDeFlux : Booleen Lecture Public;
Principal
/*******/
Variable
/******/
F1 : IFlux;
C2 : Caractere;
E3 : Entier;
Debut
...
TantQue Non F1.FinDeFlux Faire
/* Lecture caractère par caractère tant que la fin de F1 n'est pas atteinte. */
E3=F1.Lire(C2,1);
...
Fin TantQue
F1.Fermer();
...
Fin Principal
- | - | - | - | - | - | - | - | - |