OpenOffice.info

Sub Main
x = ThisComponent.URL
i = 0
Do
	i = i + 1
	x_tmp = Right(x, i)
Loop While LEFT(x_tmp, 1) <> "/"
Msgbox "Name ist: " & Right(x, i- 1)
End Sub

Loop While LEFT(x_tmp, 1) <> "/"

pfad1 = ConvertToURL(pfad)

[quote]Da Win und Linux unterschiedliche Pfadtypen[/quote]


Da Du von Pfad[b]Typen[/b] sprichst - Hinweis:
Du weist aber das in den meisten Fällen diese Betrachtungen ggf. ganz unnötig sind? Pfadtyp hört sich für mich nämlich nach Pfadtrenner (also "/" oder "\") an, und die werden in OOo mittels URL-Notation umgangen, der Trenner ist dann immer "/".

Beispiel:
Du willst den Dateinamen der aktiven Datei dadurch ermitteln indem Du ihn aus dem Pfad abtrennst:

[code]Sub Main
x = ThisComponent.URL
i = 0
Do
i = i + 1
x_tmp = Right(x, i)
Loop While LEFT(x_tmp, 1) <> "/"
Msgbox "Name ist: " & Right(x, i- 1)
End Sub[/code]

In der Zeile:

[code]Loop While LEFT(x_tmp, 1) <> "/"[/code]

ist eine Unterscheidung (<> "/" (Linux) bzw. <> "\" (Windows)) nicht nötig, da .URL immer als Pfadtrenner "/" verwendet.
Du kannst auch beliebige Pfade 'umrechnen' um sicherzustellen das das der Fall ist:

[code]pfad1 = ConvertToURL(pfad)[/code]

pfad1 enthält jetzt (systemunabhängig) immer "/" als Pfadtrenner.



Gruß
Stephan

verwende die Laufzeitfunktion [color=#008040][b]GetGUIType()[/b][/color] zum Erkennen des Betriebssystems anhand des verwendeten Fenstermanagers

Hi,

nachdem meine base-Applikation einwandfrei sowohl unter Linux (Suse 10.2) als auch unter XP läuft würde ich gern noch den Aufruf einer Datei optimieren. Da Win und Linux unterschiedliche Pfadtypen nutzen wüßte ich gern, wie man erkennen kann "wo man ist" um den Pfadstring entsprechend zu setzen.

Danke & Gruß

Andreas