[Libreoffice] LibreOffice / OpenOffice.org sniffing in extension

Christophe Strobbe Christophe.Strobbe at esat.kuleuven.be
Thu May 19 06:46:51 PDT 2011


Hi Laurent,

On Mon, 16 May 2011 16:53:05 +0200, Laurent Godard <oooconv at free.fr>
wrote:
> Hi Christophe
> 
> perharps not perfect (and in fact surely ;) )
> here is how i quickly solved this using macros
> can be implemented in java

Thanks a lot.
I managed to create a Java version that I can use in an extension.


> 
> btw, perharps not the right mailing list

I thought it was a developer question...
What is the right mailing list for this kind of question?

Best regards,

Christophe

> 
> HTH
> 
> laurent
> 
> '-----
> 
> function isLibreOffice
> 
> 	dim aSettings, nom
> 
> 	aSettings = getConfigSetting("/org.openoffice.Setup/Product", false)
> 	nom = aSettings.ooName
> 	isLibreOffice = (nom = "LibreOffice")
> 
> end function
> 
> function getConfigSetting(target as string, forUpdate as boolean)
> 
> 	dim service as String ' nom du service d'acces à la configuration
> 	dim aSettings, aConfigProvider
> 	dim aParams(0) As new com.sun.star.beans.PropertyValue
> 	dim varEmpty
> 
> 	if forUpdate then
> 		service = "com.sun.star.configuration.ConfigurationUpdateAccess"
> 	else
> 		service = "com.sun.star.configuration.ConfigurationAccess"
> 	endif
> 
> 	aConfigProvider = createUnoService(
> "com.sun.star.configuration.ConfigurationProvider" )
> 	aParams(0).Name = "nodepath"
> 	aParams(0).Value = target
> 
> 
> 	aSettings = aConfigProvider.createInstanceWithArguments(service,
> aParams() )
> 
> 	getConfigSetting = aSettings
> 
> end function

-- 
Christophe Strobbe
K.U.Leuven - Dept. of Electrical Engineering - SCD
Research Group on Document Architectures
Kasteelpark Arenberg 10 bus 2442
B-3001 Leuven-Heverlee
BELGIUM
tel: +32 16 32 85 51 
www.docarch.be
Twitter: @RabelaisA11y


More information about the LibreOffice mailing list