BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

FilePicker

Alles zur Programmierung im LibreOffice.
Antworten
H.-M.Brückmann
Beiträge: 2
Registriert: Mi 31. Mai 2017, 18:21

FilePicker

Beitrag von H.-M.Brückmann » Mi 31. Mai 2017, 18:31

Hallo zusammen,
irgendwie hab ich Probleme dem FilePicker, trotz setMultiSelectionMode(true) die ausgewälten Daten zu entlocken.
Hier der abgespeckte Code. Was mach ich falsch?

Code: Alles auswählen


Function MyFilePickerSimple() as String
 Dim oFilePickerDlg, sFilePickerArgs, oUcb
 Dim l_files()
 Dim i%
 oFilePickerDlg = createUnoService( "com.sun.star.ui.dialogs.FilePicker" )
 oFilePickerDlg.setMultiSelectionMode(true)
 oFilePickerDlg.execute
 l_files =  oFilePickerDlg.getFiles()
 	 for i = lbound(oFilePickerDlg.Files) to ubound(oFilePickerDlg.Files)
	    MsgBox(oFilePickerDlg.Files(i))
	 Next i   
End Function
habs auch mal mit einem Array (l_files) versucht, die For-Schleife gibt trotzdem immer nur eine Datei aus.
Verion von LO: 5.3.3.2 (x64) unter Windows 7

mikele
Beiträge: 1642
Registriert: Mo 1. Aug 2011, 20:51

Re: FilePicker

Beitrag von mikele » Mi 31. Mai 2017, 19:52

Hallo,
nimm .getSelectedFiles() anstelle von .getFiles()
Gruß,
mikele

H.-M.Brückmann
Beiträge: 2
Registriert: Mi 31. Mai 2017, 18:21

Re: FilePicker

Beitrag von H.-M.Brückmann » Do 1. Jun 2017, 08:51

Hallo mikele,
läuft!
Es geht auch SelectedFiles(i)
Es werden auch vollständige Dateinahmen mit Pfad zurückgegeben.

Danke!

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten