OpenOffice.info

Sub SysFont

GlobalScope.BasicLibraries.loadLibrary( "Tools" )

oRegistry_View_SysFont = GetRegistryKeyContent("org.openoffice.Office.Common/Accessibility", FALSE  )

xray oRegistry_View_SysFont.getByName( "IsSystemFont" )

End Sub

Ergänzung.

Winfrieds Code zeigte die Lösung für Skalierung. Und der folgende zur Systemschriftart.
[code]
Sub SysFont

GlobalScope.BasicLibraries.loadLibrary( "Tools" )

oRegistry_View_SysFont = GetRegistryKeyContent("org.openoffice.Office.Common/Accessibility", FALSE )

xray oRegistry_View_SysFont.getByName( "IsSystemFont" )

End Sub
[/code]
Obwohl sie in OOo unter Ansicht/View zu finden ist, wird sie aber in Basic unter "Accessibility" zugeordnet/abgefragt. Dank des beschriebenen Verfahrens war das nun ein Kinderspiel.


Gruß
balu

[...]
GetRegistryKeyContent("org.openoffice.Office.??????/View", TRUE )
[...]

oor:name="Common"

IsSystemFont

Hallo Winfried,

ja, das Verfahren muss ich mir merken. Es bringt mich wirklich einen imens großen Schritt weiter.

Mir war mittlerweile nach so einigem suchen und testen bekannt, dass die gesuchten Optionen zu der Kategorie "View" gehören, nur wusste ich nicht was ich davor einsetzen musste.
[code]
[...]
GetRegistryKeyContent("org.openoffice.Office.??????/View", TRUE )
[...]
[/code]
Und das dies jetzt "Common" ist, wär ich nie drauf gekommen. Denn ich hatte gedacht das die englischen Namen für die Hierachie genommen werden, was natürlich nicht immer stimmt. Meine WWW recherche bezog sich deshalb auf "OpenOffice.org" so wie es auch dort steht.


[quote]
Aha: in der [color=#0040FF]common.xcu[/color] im Zweig [color=#0040FF]view[/color]
[/quote]
Ja soll ich mich in ähnlichen Situationen an den Dateinamen orientieren, oder aber lieber was in der Datei steht. In diesem Falle gleich ganz am anfang.
[code]
oor:name="Common"
[/code]
Ich denk mir wohl an den Dateiinhalt.


Ferner hatte ich für die "Skalierung" nach "Scaling" gesucht, was mich aber auch nicht weiter brachte. Konnte ja nicht ahnen, dass man in OOo in den Optionen Skalierung/Scaling liest, aber in Basic das dann "FontScaling" heißt. Ist ein wenig verwirrend (nur als Bemerkung).


Ja und bei einem schnellen Blick in die [color=#0040FF]common.xcu[/color] ist mir auch schon die zweite gesuchte Option aufgefallen.
[code]
IsSystemFont
[/code]
Die ist jetzt für mich aber sehr verständlich.


[quote]
Korrektur: Du möchtest ja nur auslesen, deshalb Schalter "[color=#0040FF]forUpdate[/color]" im Funktionsaufruf auf [color=#008000]FALSE[/color] gesetzt
[/quote]
Ist gebongt.

Ich danke dir vielmals. Das bringt mich nicht nur bei meinem Projekt weiter, sondern auch beim Lernen :D.

Wünsch dir noch einen schönen abend.


Gruß
balu

find  -name '*' -mmin 1 

<node oor:name="View">
  <node oor:name="Dialog">
   <prop oor:name="MousePositioning" oor:type="xs:short">
    <value>0</value>
   </prop>
  </node>
  <prop oor:name="FontScaling" oor:type="xs:short">
   <value>120</value>
  </prop>

Sub de48861
' 2011-06-13

GlobalScope.BasicLibraries.loadLibrary( "Tools" )


oRegistry_View = _
GetRegistryKeyContent("org.openoffice.Office.Common/View", FALSE )

xray oRegistry_View.getByName( "FontScaling" )

End Sub

Mein Vorgehen, um sowas rauszufinden:


* ich ändere mit OOo eine Option
* nun suche ich in den Konfigurationsdateien, wo sich was geändert hat. Mit Linux bekomme ich im OOo-Benutzerverzeichnis mit dem Befehl [code]find -name '*' -mmin 1 [/code] die Dateien, die in der letzten Minute geändert wurden.

Da wird mit dann angezeigt
[color=#0040FF]./registry/data/org/openoffice/Office/Common.xcu[/color]

Schaue ich diese Datei in einem Texteditor an (und suche nach dem geänderten Wert, bspw. [color=#0040FF]120[/color]), so finde ich schnell die Stelle

[code]<node oor:name="View">
<node oor:name="Dialog">
<prop oor:name="MousePositioning" oor:type="xs:short">
<value>0</value>
</prop>
</node>
<prop oor:name="FontScaling" oor:type="xs:short">
<value>120</value>
</prop>[/code]

Aha: in der [color=#0040FF]common.xcu[/color] im Zweig [color=#0040FF]view[/color]

Nun ist es nicht mehr weit zum Code:

[code]Sub de48861
' 2011-06-13

GlobalScope.BasicLibraries.loadLibrary( "Tools" )


oRegistry_View = _
GetRegistryKeyContent("org.openoffice.Office.Common/View", FALSE )

xray oRegistry_View.getByName( "FontScaling" )

End Sub[/code]


Hilft Dir das weiter?



Korrektur: Du möchtest ja nur auslesen, deshalb Schalter "[color=#0040FF]forUpdate[/color]" im Funktionsaufruf auf [color=#008000]FALSE[/color] gesetzt

[...]
GetRegistryKeyContent("org.openoffice.Office.Calc/Input", TRUE )
[...]

xray oRegistry_Calc_Input

xray oRegistry_Calc_Input.getHierarchicalName

Hallo liebe Forengemeinde,

ich möchte gerne
-> Extras
-> Optionen
-> OpenOffice.org
==> Ansicht
den Status für die Skalierung und für die Systemschriftart auslesen (rote Umrandung), und dann auswerten aber nicht verändern.

[attachment=0]Optionen-Ansicht2.png[/attachment]

Meine momentanigen recherchen hatten mich heute zum folgendem Thread geführt:
[url=http://de.openoffice.info/viewtopic.php?f=2&t=26259#p111613]Programmoptionen per Makro ändern[/url]
Jedoch hilft er mir nicht wirklich weiter, da es dort um Calc aber nicht um die allgemeine Ansicht-Optionen geht. In dem Code von Winfried bin ich auf folgende Zeile gestoßen, die mich anfangs hoffen lies.
[code]
[...]
GetRegistryKeyContent("org.openoffice.Office.Calc/Input", TRUE )
[...]
[/code]
Erst dachte ich noch:
[i]"Na Prima! Da muss ich doch wohl nur von der Optionenlisten-Hierachie(*) den passenden Eintrag für Ansicht finden."[/i]
Doch leider finde ich sie nicht. Also zu früh gefreut.

(*)
Damit meine ich im Optionenfenster die Linke Seite wo die einzelnen Kategorien stehen. Also
[+] OpenOffice.org
[+] Laden/Speichern
..... etc.

Mein Versuch den Code schrittweise mit xray zu untersuchen, bringt mich auch nicht sehr viel weiter.
[code]
xray oRegistry_Calc_Input
[/code]
Damit bekomme ich wohl nur Zugriff auf bestimmte Optionen für Calc. Und das ist in der Optionen-Hierachie für mich viel zu weit unten.

Und mit
[code]
xray oRegistry_Calc_Input.getHierarchicalName
[/code]
bekomme ich den Eintrag für "[color=#404000][b]GetRegistryKeyContent[/b][/color]", also [u][i]/org.openoffice.Office.Calc/Input[/i][/u] ausgegeben.


Hier meine Fragen.
- Kurz und gut, was muss ich bei [color=#404000][b]GetRegistryKeyContent("...." , TRUE)[/b][/color] eintragen, damit ich auf die gewünschten Optionen zugreifen kann?
- Besser noch, wegen dem Lerneffekt. Was muss ich bei xray angeben um selber den gesuchten Eintrag für [color=#404000][b]GetRegistryKeyContent[/b][/color] zu finden? Unter [color=#0000BF][b]myDoc = ThisComponent[/b][/color] find ich nichts, oder ich such verkehrt.


Um es noch mal zu betonen:
Mir geht es nicht darum die eingangs genannten und gezeigten Optionen zu verändern, sondern nur um das auslesen und auswerten.


Ich hoffe ihr könnt mir wieder auf die Sprünge helfen.

Für eure Bemühungen bedanke ich mich schon mal im voraus, und freue mich auf eure Antworten :D.


Gruß
balu