OpenOffice.info

besten Dank hat geklappt

mfg sHeepy

'...
pfad = ThisComponent.URL
i = 0
Do 
   i = i + 1
   x = Right(pfad, i)
Loop While Left(x, 1) <> "/"
Msgbox "Pfad: " & LEFT(pfad, LEN(pfad)-i)

und wie geschrieben kennt er den Pfad anscheind nicht wenn ich nur "/gfx/2.jpg" schreibe. Wenn ich allerdings den vollen Pfad angebe (H:/gfx/2.jpg) eingebe zeigt er mir das Bild an...was mache ich hier falsch?

garnichts, ich denke es werden an dieser Stelle einfach keine relativen Pfade existiert, zumindest ist mir das noch nicht gelungen.

Und mit ThisComponent.URL bekomme ich zwar den kompletten pfad des Dokumentes, aber leider ja auch den Dateinamen..

Ja und - wir sind hier in einem Basic.Forum, es sollte doch leicht möglich sein den Pfad abzutrennen so man etwas programmieren kann.
Hier im Forum der erste Thread verweist auf die StarBasic-FAQ, dort findest Du sowas, aber schwer ist das doch ohnehin nicht. Suche den ersten Trenner "/" von rechts, also etwa nach dem Schema:

[code]'...
pfad = ThisComponent.URL
i = 0
Do
i = i + 1
x = Right(pfad, i)
Loop While Left(x, 1) <> "/"
Msgbox "Pfad: " & LEFT(pfad, LEN(pfad)-i)[/code]


(nicht getestet)



Gruß
Stephan

mhn also mein Dialog ist in meinem Dokument gespeichert welches auf dem LW H liegt.
Die Bilder dazu liegen auf H:\gfx\

Nun möchte ich aber nicht den Absuluten Pfad verwenden, da ich das Dokument auf einen anderen Computer überspielen muss und sich deshalb die Pfadangabe (LW H: ) ändert.

und wie geschrieben kennt er den Pfad anscheind nicht wenn ich nur "/gfx/2.jpg" schreibe. Wenn ich allerdings den vollen Pfad angebe (H:/gfx/2.jpg) eingebe zeigt er mir das Bild an...was mache ich hier falsch?


Und mit ThisComponent.URL bekomme ich zwar den kompletten pfad des Dokumentes, aber leider ja auch den Dateinamen..


mfg sHeepy

ThisComponent.URL

Kommt darauf an wo sich der Dialog befindet. Ist er in einem Dokument bekommst Du dessen Pfad mit:

[code]ThisComponent.URL[/code]

und kannst relative Pfade davon ableiten.
Hast Du nur ein Makro was Du irgendwo installierst mußt Du in Kenntnis der Verzeichnisse in der das Makro sein kann nach einer eindeutigen Datei (z.B. Deiner Grafik) im Dateisystem suchen.
Anfangspfade zum Suchen sind die Pfade für OOo-Bibliotheken, User-Bibliotheken und OOo- und User-UNO-packages. Nur unterhalb dieser Pfade können sich praktischerseits installierte Makros befinden.



Gruß
Stephan

ogfx = odialog.getControl("gfx").getModel()
Pfad = "/gfx/2.jpg"
ogfx.ImageURL = Pfad

Moin Moin,
Ist es möglich für Grafikobjekte einen relativen Pfad anzugeben?
Ich habe folgendes Versucht:

[code]
ogfx = odialog.getControl("gfx").getModel()
Pfad = "/gfx/2.jpg"
ogfx.ImageURL = Pfad
[/code]

aber leider funktioniert dies nicht

hat jemand eine Idee? :-)

mfg sHeepy