GenererThesaurus

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

Fonction GenererThesaurus(NomFichierThesaurus : Caractere, SupprimerTraductionsInutiles : Booleen, EnvoyerMessage : Nul Ou Procedure(LibelleSection : Caractere, MotCle : Caractere)) Retourner Booleen

La fonction GenererThesaurus permet de générer le thésaurus de nom NomFichierThesaurus.

Le résultat est Vrai en cas de succès.

Si le paramètre SupprimerTraductionsInutiles a pour valeur Vrai, alors les traductions inutiles sont supprimées, sinon elles sont conservées. Chaque suppression est transmise au paramètre EnvoyerMessage. Les paramètres LibelleSection et MotCle contiennent alors respectivement la section et le mot-clé correspondant.

Revenir en haut de la page...

Procedure EnvoyerMessage(LibelleSection : Caractere, MotCle : Caractere)
/**********************************************************************/
Debut
Ecran.Ecrire("La traduction '"+MotCle+"' de la section '"+LibelleSection+"' est supprimée.");
Fin Procedure

Principal
Debut
...
Si Non ChargerThesaurus("demo") Alors Fin Si
...
Si Non ChargerFichierMessage("${UPS_HOME}/demo/upsnls/${UPS_LANGUE}/demo.nls") Alors Fin Si
...
Si Non GenererThesaurus("demo2", Vrai, EnvoyerMessage) Alors Fin Si
...
Fin Principal

Revenir en haut de la page...

ChargerFichierMessage pour charger un fichier de messages.

Revenir en haut de la page...

ThesaurusErzeugenGenerateThesaurus引起分类词词典GenerarTesoro----

Revenir en haut de la page...