Pfade getrennt nach Anwendung festlegen

Setup und Komponenten-übergreifende Probleme.

Moderator: Moderatoren

Dinole
Beiträge: 7
Registriert: Fr, 27.09.2013 12:15

Pfade getrennt nach Anwendung festlegen

Beitrag von Dinole »

Hallo zusammen,

ich habe in OpenOffice Calc unter "Pfade" ein Arbeitsverzeichnis "D:\USER\EXCEL" erstellt.
Gleiches habe ich OpenOffice Writer mit "D:\USER\WORD" erstellt.

Jetzt fällt mir aber auf, dass beim Öffnen eines Word Dokuments der Pfad "D:\USER\EXCEL" genutzt wird. Stelle ich dann wieder manuell den Pfad auf "D:\USER\WORD" und öffne anschließend ein EXCEL Dokument, dann wird mir dort der Pfad "D:\USER\WORD" angezeigt.

Ist es denn nicht möglich, in jeder Anwendung einen separaten Pfad einzustellen, ohne immer diesen Pfad manuell abändern zu müssen?

Vielen Dank und Grüße

Michael
Eddy
********
Beiträge: 2781
Registriert: So, 02.10.2005 10:14

Re: Pfade getrennt nach Anwendung festlegen

Beitrag von Eddy »

Hallo Dinole allein,
Dinole hat geschrieben:Ist es denn nicht möglich, in jeder Anwendung einen separaten Pfad einzustellen,
Open- oder Libre Office ist nur eine Anwendung mit Writer, Calc usw. Daher kannst Du auch nur einen Pfad festlegen.

Mit angewendeten Grüßen

Eddy
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Pfade getrennt nach Anwendung festlegen

Beitrag von komma4 »

Hier ein Code-Schnipsel aus meiner Kiste, was die Aufgabe erledigen sollte*:

Code: Alles auswählen

SUB openArbVerzeichnis()
' 20130927

IF NOT _
GlobalScope.BasicLibraries.isLibraryLoaded( "Tools" ) Then
GlobalScope.BasicLibraries.loadLibrary( "Tools" ) 
END IF 

' Array der vom aktuellen Dokument unterstützen Services
aServices = ThisComponent.getSupportedServiceNames()


IF PartStringInArray( aServices, _
	"com.sun.star.text.TextDocument" , 1 ) > 0 THEN
	'sAnwendung = "WRITER"
	sPfad = "D:\USER\WORD"
ELSEIF PartStringInArray( aServices, _
	"com.sun.star.sheet.SpreadsheetDocument" , 1 ) > 0 THEN
	'sAnwendung = "CALC"
	sPfad = "D:\USER\EXCEL"
END IF 

oFileDialog = _
CreateUnoService( "com.sun.star.ui.dialogs.OfficeFilePicker" )
oFileDialog.Title = "Mein Öffnen-Dialog"
oFileDialog.setDisplayDirectory( ConvertToURL( sPfad ) )
iAuswahl = oFileDialog.execute()

' OK = 1
IF iAuswahl = 1 THEN
aDateien = oFileDialog.getFiles()
StarDesktop.loadComponentFromURL( _
aDateien(0), "_blank", 0, Array() )
END IF 

END SUB 

Im der STANDARD-Bibliothek speichern und der Tastenkombination STRG+O zuweisen (beides: siehe WIKI)

Kommst Du damit zurecht?


*sollte: weil -kein Windows-, deshalb ungetestet mit eingestellten Pfaden
Cheers
Winfried
aktuell: LO 5.3.5.2 30m0(Build:2) SUSE rpm, unter Linux openSuSE Leap 42.3 x86_64/KDE5
DateTime2 Einfügen von Datum/Zeit/Zeitstempel (als OOo Extension)
Antworten