LibreOffice-Forum

Obwohle ich altssearch für LO geladen habe kommen dies Fehler:
Was tun openofice Star Writer zusätzlich installieren?
In der registry rum pfuschen?

Function GetStarOfficeLocale_() as New com.sun.star.lang.Locale
Dim aLocLocale As New com.sun.star.lang.Locale
Dim sLocale as String
Dim sLocaleList(1)
Dim oMasterKey
oMasterKey = GetRegistryKeyContent("org.openoffice.Setup/L10N/")
sLocale = oMasterKey.getByName("ooLocale")
sLocaleList() = ArrayoutofString_(sLocale, "-")
aLocLocale.Language = sLocaleList(0)
If Ubound(sLocaleList()) > 0 Then
aLocLocale.Country = sLocaleList(1)
End If
GetStarOfficeLocale_() = aLocLocale
End Function

Function GetRegistryKeyContent(sKeyName as string, Optional bforUpdate as Boolean)
Dim oConfigProvider as Object
Dim aNodePath(0) as new com.sun.star.beans.PropertyValue
oConfigProvider = createUnoService("com.sun.star.configuration.ConfigurationProvider") 3 mal
aNodePath(0).Name = "nodepath"
aNodePath(0).Value = sKeyName

Wenn altssearch nicht funktioniert, obwohl die Extension auf der Download-Seite als kompatibel mit Deiner Programmversion beschrieben ist, dann musst Du Dich an den Entwickler der Extension wenden.