von DPunch » Di, 21.06.2011 17:24
Aloha
Hansi hat geschrieben:ich meinte den Code zum Speichern auf Basis des Filepicker.
Naja, was den Filepicker angeht, funktioniert das genauso wie das Öffnen von Dateien, der Filepicker liefert Dir ja nur den Pfad zurück.
Was Dir noch fehlen dürfte, ist die Möglichkeit, komplett neue Dateien anzulegen, das machst Du mit der 2. Zeile in diesem Codebeispel.
Code: Alles auswählen
oFilePicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
oFilePicker.Initialize(Array(com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_SIMPLE))
oFilePicker.appendFilter("Alle Dateien","*.*")
oFilePicker.setDisplayDirectory("C:")
nResult = oFilePicker.execute
If nResult <> 0 Then MsgBox oFilePicker.Files(0)
Aloha
[quote="Hansi"]ich meinte den Code zum Speichern auf Basis des Filepicker.[/quote]
Naja, was den Filepicker angeht, funktioniert das genauso wie das Öffnen von Dateien, der Filepicker liefert Dir ja nur den Pfad zurück.
Was Dir noch fehlen dürfte, ist die Möglichkeit, komplett neue Dateien anzulegen, das machst Du mit der 2. Zeile in diesem Codebeispel.
[code]oFilePicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
oFilePicker.Initialize(Array(com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_SIMPLE))
oFilePicker.appendFilter("Alle Dateien","*.*")
oFilePicker.setDisplayDirectory("C:")
nResult = oFilePicker.execute
If nResult <> 0 Then MsgBox oFilePicker.Files(0)[/code]