OpenOffice.info

Dim oPathSettings As Object
Dim arrTemplateFolder() As Variant
	
oPathSettings = createUnoService("com.sun.star.util.PathSettings")
arrTemplateFolder() = split(oPathSettings.getPropertyValue("Template"), ";")

Hmmm...

schon sooooooooooooooooooooooooo lange her und noch immer keine Antwort? :shock:

Hier ist ein Array mit den OOo-Pfadeigenschaften/URLs von den Template-Dateien:

[code]
Dim oPathSettings As Object
Dim arrTemplateFolder() As Variant

oPathSettings = createUnoService("com.sun.star.util.PathSettings")
arrTemplateFolder() = split(oPathSettings.getPropertyValue("Template"), ";")
[/code]

Viele Grüße,

Marcel

Hallo,

in LibreOffice sei in der Template-Verwaltung folgende Situation gegeben:


[attachment=0]template-Verwaltung.gif[/attachment]


[b]Ist es möglich von allen Vorlagen im Ordner "Buero" direkt die vollständige Adresse der Vorlagendatei (Pfad+Name) zu ermitteln?[/b]

Intern muss diese Information existieren, denn z.B. bei .LoadComponentFromURL gibt es im zugehörigen Parameterarray die Parameter "TemplateName" und "TemplateRegionName" und LO ist offensichtlich in der Lage daraus die Pfade zu 'rekonstruieren'.


Hintergrund:
Die im Bereich "Buero" angezeigten Vorlagen sind teilweise lokal im Template-Ordner (Unterordner "Buero") gespeichert sowie teilweise innerhalb einer installierten Extension (in user/unopackages) und ich frage mich ob man über die Struktur der Template-Verwaltung zugreifen kann ohne vorher die physischen Pfade zu ermitteln.





Gruß
Stephan