Fonction Habilitation Optimiser(PasDEffetDeBord) FormaterThesaurus(NomThesaurus : Caractere, Format : FormatThesaurus, LangueCible : LanguesSupportees, EnvoyerMessage : Nul Ou Procedure(MessageEnvoye : Caractere)) Retourner Booleen
Le thésaurus sélectionné est celui défini par la langue cible LangueCible, qui n'est pas forcément la langue courante.
Pour chaque fichier produit, un message est envoyé via le paramètre EnvoyerMessage. Le paramètre MessageEnvoyer contient alors le nom d'un des fichiers.
Le résultat est Vrai en cas de succès.
/****************************************************************/
Procedure EnvoyerMessage(MessageEnvoye)
/* Objet : Envoie un message. */
/****************************************************************/
Debut
Ecran.Ecrire("Formatage de '"+MessageEnvoye+"'.");
Fin Procedure
Principal
/*******/
Debut
...
Si Non FormaterThesaurus("demo2", FormatThesaurusTexte, LangueAnglais, EnvoyerMessage) Alors
...
Fin Si
...
Fin Principal
- | - | - | - | - | - | - | - | - |