 | Start a set with this search |
 | Include this search in one of my sets |
 | Exclude this search from one of my sets |
 | Permalink to these results Paste this link in email or IM: |
 | Atom feed for tracking future search results Paste this URL into your reader: |
9 messages in org.openoffice.fr.progRe: [prog] Changer la langue locale| From | Sent On | Attachments |
|---|---|---|
| Didier Dorange-Pattoret | Nov 22, 2008 6:40 am | |
| Francois Gatto | Nov 22, 2008 11:02 pm | |
| Didier Dorange-Pattoret | Nov 23, 2008 1:19 pm | |
| Francois Gatto | Nov 23, 2008 10:40 pm | |
| Bernard Marcelly | Nov 24, 2008 3:22 am | |
| Didier Dorange-Pattoret | Nov 24, 2008 4:05 am | |
| Didier Dorange-Pattoret | Nov 24, 2008 4:11 am | |
| Didier Dorange-Pattoret | Nov 24, 2008 4:14 am | |
| Francois Gatto | Nov 24, 2008 10:27 am |
| Permalink for this message Paste this link in email or IM: |
| Permalink for this thread Paste this link in email or IM: |
| Atom feed for this thread Paste this URL into your reader: |
| Subject: | Re: [prog] Changer la langue locale | Actions... |
|---|---|---|
| From: | Francois Gatto (oo...@volcar.org) | |
| Date: | Nov 24, 2008 10:27:11 am | |
| List: | org.openoffice.fr.prog | |
Bonsoir à tous deux ... et aux amis allemands ;)
Bernard Marcelly wrote:
Bonjour, Trouvé ! (désolé, François ;) )
Pas de problème, puisque je ne pouvais m'y atteler dans la journée.
Exemple :
Dim dlg As Object, bibli As Object, monDialogue As Object Dim langue As New com.sun.star.lang.Locale
DialogLibraries.loadLibrary("Library1") bibli = DialogLibraries.getByName("Library1") monDialogue = bibli.getByName("Dialog1") dlg = CreateUnoDialog(monDialogue) dlg.execute ' avec la langue de l'interface utilisateur langue.Language = "de" langue.Country = "DE" dlg.Model.ResourceResolver.setCurrentLocale(langue, True) dlg.execute ' le même en allemand dlg.dispose
Excellent !
Attention: Ce changement est appliqué à tous les dialogues de la même bibliothèque, et reste mémorisé pour de nouveaux lancements de macros jusqu'à ce que - soit on change encore la langue - soit on ferme le document (bibliothèque de document) - soit on ferme OpenOffice (bibliothèque de Mes Macros/OOo Macros).
Il y aurait toujours la possibilité de récupérer un paramétrage (module, fichier "cookies like"), non ?
______ Bernard
Message de Francois Gatto date 2008-11-24 07:41 :
Bonjour,
Ton besoin est maintenant clairement exprimé ;-) et en effet la solution présentée a une portée globale pour OOo.
Je vais chercher ...
Francois Gatto
Didier Dorange-Pattoret wrote:
Bonsoir à tous,
Merci à François pour sa proposition qui fonctionne.
Mais ne règle pas mon problème.
Je m'explique : Vous savez que maintenant les boîtes de dialogue peuvent être configurées en multilangues avec une langue par défault. Problème la langue chargée est la langue d'installation de OOo. Elle est définie semble-t-il dans la propriété ooLocale.
Sub Main oConfigAccess = GetConfigAccess( "/org.openoffice.Setup/L10N", True ) oConfigAccess.ooLocale = "de" oConfigAccess.commitChanges() End Sub
OOo refuse de la changer bien qu'une analyse faite avec Xray ne donne pas cette propriété comme read only. Du coup, je cherche un moyen de modifier les paramètres utilisateurs pour que OOo charge des boîtes de dialogues dans une langue que l'utilisateur choisit et donc pas nécessairement celle d'installation de OOo. On peut y parvenir en écrivant les traductions dans les modules Basic, mais je voudrais utiliser les fonctionnalités nouvelles des boîtes de dialogues.
Si quelqu'un a une idée ...
Merci d'avance.
Didier Dorange-Pattoret www.dmaths.org
Bonne continuation dans ton projet Didier.
Francois Gatto