Thanks to the folks that sent fixes to the languages ( German, French,
Russian ) and for the suggestions for features also.
So - 16 languages - and 57 Locals...whehw...
Final piece on this and I just don't know what, if anything I am doing
wrong.
I need to ask OOo what the current language setting is when I display
the OverWriteFile warning. So I need the language not the local..
OK - here is my routine:
function getLanguage() as string
dim oLocale as new com.sun.star.lang.Locale
dim oConfigProvider as variant
Dim aSettings as variant
Dim aProps(0) As new com.sun.star.beans.PropertyValue
oConfigProvider = createUnoService(
"com.sun.star.configuration.ConfigurationProvider" )
aProps(0) = MakePropertyValue( "nodepath", "/org.openoffice.Setup/L10N" )
aSettings =
oConfigProvider.createInstanceWithArguments("com.sun.star.configuration.ConfigurationAccess",
aProps() )
oLocale = aSettings.getLocale
getLanguage = oLocale.Language
End function
problem is the oLocal structure is empty?
Any help would be appreciated.
Thanks
Drew
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
