XRay aufrufen in Writer?

de-users
#1

Hallo,

ich möchte in "Writer" das nützliche Tool "XRay" aufrufen:

Hier der Code:

REM  *****  BASIC  *****

Sub Main
Dim odoc As Object
odoc = ThisComponent
xray odoc
End Sub

Allerdings bekomme ich folgende Fehlermeldung:

Basic Laufzeitfehler

Prozedur Sub oder Funktion nicht definiert (xray odoc)

Was muss ich tun, damit es funktioniert?

Mfg

Gerch

#2

Hallo gerch,

eine wahrscheinlihe Ursache ist, dass die Bibliothek Xray nicht geladen ist. Manuell kannst du sie laden, indem du sie in der Basic-IDE öffnest. Besser ist ein Statement:
BasicLibraries.LoadLibrary("XrayTool")
das vor dem Aufruf von Xray ausgeführt wird.
Wenn du das immer wieder brauchst, kannst du den Befehl in ein Makro legen, das beim Start von LibreOffice automatisch geladen wird, anstat das in die einzelnen Makros immer wieder einzufügen. Das ist in der Anleitung von Xray beschrieben.

Viele Grüße
Gerhard

#3

Hallo Gerch,
bist du sicher, dass die vorletzte Zeile im Programm
   xray odoc
und nicht

xray(odoc)
heißen muss?
MfGDaniel