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 --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
