Discussion :

[yogitetradim]

Bonjour à tous,

j' espère que l'intitulé de ce post est assez explicite :
Voilà, j'ai réalisé un ensemble de programmes en Fortran90. Dans le code, de nombreuses questions en français sont posées à l'utilisateur. J'utilise une instruction simple.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print*,"Rentrez le paramètre X"

J'aimerai pouvoir créer une version anglaise de ces mêmes programmes et la perspective de reprendre une à une toutes les instructions print*,qqchose en français" ne m'emballe pas des masses.
Ma question est donc : "Comment gérez vous les messages produits par les programmes pour permettre une traduction facile de ceux-ci ?"
Par avance merci pour vos réponses

[FR119492]

Salut.

Une solution simple pour faire un programme multilingue, mais qui n'est peut-être pas la plus élégante: tu fabriques un fichier quest_fr.txt qui contient toutes tes questions en français, à raison d'une par ligne, un fichier quest_en.txt pour l'anglais (dans le même ordre évidemment!), un fichier quest_de.txt pour l'allemand, etc. Dans ton programme, tu ouvres seulement le fichier correspondant à la langue choisie.

Jean-Marc Blanc

[yogitetradim]

Merci de ta réponse,

Bon c'est à ce type de solution que j'avais pensé...en arrivant à ce même constat "c'est pas forcément très élégant". Donc, l'appel reste lancé si quelqu'un a une méthode qui lui semble plus élégante !

[Sylvain Bergeron]

J'ai utilisé 3 techniques :

• Mettre les messages en anglais pour tous !!!
• L'approche suggérée par FR119492
• if (Francais()) then Message en français, else ...

À propos de la technique avec fichier :

Elle est rapidement très lourde. Par exemple, si tu veux insérer des informations contextuelles dans le message, il faut, soit mettre des "tags" à remplacer dans le message, soit découper le message en section.

J'ai monté un système jadis dans lequel j'avais placé les formats dans le fichier et non de simples messages. Ça avait la forme:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
...
call GetMessage(123,StrFmt)
write(UnitErreur,StrFmt) LigneErreur, AutreInfoContexte
...

Le fichier contenait à la ligne 123 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
...
('Erreur trouvée à la ligne ',i5,' du fichier ',a, .... )
...