Bonsoir,
Savez vous comment détecter si, entre autres,
Outils/Options.../OpenOffice.org Writer/
Aides au formatage/Texte masqué
est cochée?
Il faut tout d'abord trouvé où se cache le noeud dans les fichiers de
configurations pour pouvoir ensuite y accéder grâce à l'API[1][2].
En modifiant les paramètres d'OOo et en regardant dans son répertoire
utilisateur OOo, on trouve le noeud dans le fichier Writer.xcu.
Voici un exemple pour le cas présent :
Sub lireOptions()
Dim nodeArgs(0) As New com.sun.star.beans.PropertyValue
Dim oService$
Dim Provider, readAccess As Object
'Noeud de configuration
nodeArgs(0).Name = "nodePath"
nodeArgs(0).Value = "/org.openoffice.Office.Writer/Content/NonprintingCharacter"
'Service ConfigurationProvider
oService = "com.sun.star.comp.configuration.ConfigurationProvider"
Provider = createUnoService(oService)
'Service ConfigurationAccess
oService = "com.sun.star.configuration.ConfigurationAccess"
readAccess = Provider.createInstanceWithArguments(oService, nodeArgs())
Msgbox "L'option Champs Texte masqué est à " + readAccess.HiddenText
End Sub
[1]http://api.openoffice.org/docs/common/ref/com/sun/star/configuration/ConfigurationProvider.html
[2]http://api.openoffice.org/docs/common/ref/com/sun/star/configuration/ConfigurationAccess.html
2 messages in org.openoffice.fr.progRe: Comment détecter si une option es...
