[Issue 123544] XFilePicker's setDisplayDirectory and setDefaultName do not work in Windows

[bugzilla]

https://issues.apache.org/ooo/show_bug.cgi?id=123544

--- Comment #20 from brinzing <oliver.brinz...@gmx.de> ---
> Can confirm, with initializing it works.

no, i mistakenly thought it will work, but it will only work the *first* time. 
after a file has been saved, the display directory will always point to the
last save path. run macro twice, second time change "dlg.DisplayDirectory"
to a different directory.

Sub Main
    Dim dlg as Object
    Dim oDoc as Object
    Dim mNoArgs()
    Dim sURL as String

    dlg = CreateUnoService( "com.sun.star.ui.dialogs.FilePicker" )

    Dim Dialogtyp(0)
    DialogTyp(0) =
com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_AUTOEXTENSION

    dlg.initialize(DialogTyp())
    dlg.Title = "Test"

    sURL = "private:factory/swriter"
    oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, mNoArgs)

'    dlg.DisplayDirectory = "file:///c:/users"
    dlg.DisplayDirectory = "file:///c:/temp"

    If dlg.Execute = 1 Then 
        sURL = dlg.SelectedFiles(0)
        oDoc.storeToURL(sURL, mNoArgs)
    EndIf
End Sub

-- 
You are receiving this mail because:
You are on the CC list for the issue.
You are the assignee for the issue.
You are watching all issue changes.