Discussion :

[FOCUS77]

Bonsoir à tous,

Le fichier MonProjet.fr.po affiche tous les captions et composants sauf les DBNavigators.
afin de Franciser les Hints de DBNavigator je les ai modifiés ainsi:

Premier
Précédent
Suivant
Dernier
Insérer
Supprimer
#Éditer
Poster
#Abandonner
#Rafraîchir

#text pour un bouton invisible.

Cependant pour d'autre langues j'ai préféré configurer plutôt le fichier po.

Des idées?

[gvasseur58]

Bonjour,

Pour le DBNavigator, il n'y a pas besoin de traduire les hints qui le sont déjà dans le fichier lazarus.XX.po correspondant à la langue en cours (XX pour la langue, par exemple "fr" pour le français).

Parmi les tutoriels sur Lazarus, il y en a un sur l'internationalisation des logiciels. Tu pourrais t'en inspirer largement.
Un conseil : tenir compte du post d'alcatîz (je n'ai pas encore eu le temps de mettre à jour le tutoriel ).

Cordialement,

Gilles

PS : je devrais préciser : pas de traduction nécessaire si le fichier po est à jour...

[FOCUS77]

Bonjour à tous,

@GV

Je n'ai pas su comment réglé ce problème sauf superposé deux dbnavigators
le premier conserve les Hints en Français.
le deuxième ses Hints sont changés en Arabe.

et que leurs visibilités sont exclusives

[FOCUS77]

Bonsoir à tous,

Les fichiers Projet.xx.po sont reconnus et lus par l'application tandis que les fichiers lclstrconsts.xx.po sont ignorés
bien que j'ai ajouté une Unit 'Translations' à uses pour localiser ces fichiers.

En fait ses derniers ne sont lus qu'une seule fois lors de démarrage de l'EDI.

Donc la bascule d'une langue à l'autre ne serait que partielle ou m'échappe t-il quelques choses?

Code :

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

1
2
3
4
5
6
7
8
procedure TAcceuil.Button1Click(Sender: TObject);
var langpath:ansistring;
begin
  langpath:=ExtractFilePath(Application.ExeName)+'Languages\' ;
  Translations.TranslateUnitResourceStrings('LCLStrConsts',
langpath + 'lclstrconsts.ar.po','ar', '');
  lcltranslator.SetDefaultLang('ar');
end;

J'ai téléchargé cette démo: http://forum.lazarus.freepascal.org/...0;attach=12001
mais pour le moment ça n'a pas réglé le problème.

[gvasseur58]

Bonjour,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
procedure TAcceuil.Button1Click(Sender: TObject);
var langpath:ansistring;
begin
   //Tout ce qui suit est inutile... car demande un redémarrage de l'application
  // langpath:=ExtractFilePath(Application.ExeName)+'Languages\' ;
  //Translations.TranslateUnitResourceStrings('LCLStrConsts',
  //  langpath + 'lclstrconsts.ar.po','ar', '');
 
  // seule ligne utile !!!
  lcltranslator.SetDefaultLang('ar');
end;

Seule la dernière ligne est utile si les fichiers de traduction sont dans le sous-répertoire "languages" de l'application . Il n'y a plus besoin d'une unité spécifique.
Voici ce qu'a écrit alcatîz à juste titre dans la discussion qui accompagne le tutoriel sur l'internationalisation auquel je renvoie encore :

Je me permets de rajouter ma petite pierre à l'édifice. Depuis la version 1.2 de Lazarus, il est possible de basculer entre plusieurs langues sans devoir redémarrer l'application, grâce à la procédure SetDefaultLang de l'unité LCLTranslator.

J'ai testé la chose avec succès et, à condition que les fichiers .po soient présents au bon endroit, l'exécution de SetDefaultLang('xx'); ('xx' pour 'fr', 'de', 'en'...) rafraîchit tous les contrôles et menus dans la langue désirée.

Le "bon endroit" automatiquement trouvé par Lazarus est le sous-répertoire "languages" de l'application (en fait, il y a plusieurs "bons endroits", mais peu importe ici).

NB : je ne coderais pas en dur les chemins afin de laisser l'application fonctionner sous Linux par exemple. Pour cela, il faut remplacer les '\' par PathDelim.

NB2 : as-tu traduit les fichiers lclstrconsts.po et lazaruside.po en arabe ? Je crois qu'ils ne sont pas disponibles dans cette langue et ils seraient sans doute appréciés (en fait, lazarus.ar.po existe, mais il manque 4752 phrases non traduites ).

[FOCUS77]

Bonsoir à tous,

@GV

Les fichiers Projet.xx.po sont reconnus et lus par l'application tandis que les fichiers lclstrconsts.xx.po sont ignorés même lclstrconsts.fr.po

tous mes fichiers po se trouvent dans le dossier :Application/Languages.

Seule la dernière ligne est utile si les fichiers de traduction sont dans le sous-répertoire "languages" de l'application .
Il n'y a plus besoin d'une unité spécifique.

je suis d'accord

Le "bon endroit" automatiquement trouvé par Lazarus est le sous-répertoire "languages" de l'application
(en fait, il y a plusieurs "bons endroits", mais peu importe ici).

ça je le sais.

NB : je ne coderais pas en dur les chemins afin de laisser l'application fonctionner sous Linux par exemple. Pour cela, il faut remplacer les '\' par PathDelim.

Bonne remarque.

NB2 : as-tu traduit les fichiers lclstrconsts.po et lazaruside.po en arabe ? Je crois qu'ils ne sont pas disponibles dans cette langue et ils seraient sans doute appréciés (en fait, lazarus.ar.po existe, mais il manque 4752 phrases non traduites ).

J'ai pensé déjà d'entamer cette traduction après la résolution de cette question.
pour le moment J'ai traduit uniquement les 10 Hints du navigator, mais je ne pense pas que c'est la cause car même le fichier lclstrconsts.fr.po est ignoré.

En fait si on dépose un Navigator sur une fiche et on exécute les Hints sont affichés en Anglais mais si on ouvre ce Hints et
on déplace un mot parmi les 10 par la barre d'espacement les Hints seront affichés en Francais

Je reformule ma question: est ce que quelqu'un peut me fournir le code qui transforme les Hints du français vers l'Anglais et inversement
pendant l'exécution?

merci