 | 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: | Bernard Marcelly (marc...@club-internet.fr) | |
| Date: | Nov 24, 2008 3:22:24 am | |
| List: | org.openoffice.fr.prog | |
Bonjour, Trouvé ! (désolé, François ;) ) 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
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).
______ 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