Hi Fernand,
Fernand Vanrie wrote:
OK : here is the code i did it years agoo but orgot the exitence :-)
Sub ChangeSystemFileDialog
dim aArgs(0) as Object
dim aPropValue as new com.sun.star.beans.PropertyValue
xconfig =
createunoservice("com.sun.star.configuration.ConfigurationProvider")
aPropValue.Name = "nodepath"
aPropValue.Value = "org.openoffice.Office.Common/Misc"
aArgs(0) = aPropValue
xAccess =
xconfig.createinstanceWithArguments("com.sun.star.configuration.ConfigurationUpdateAccess",aArgs())
aIsSystemDialog =
xAccess.getHierarchicalPropertyValue("UseSystemFileDialog")
xAccess.replaceByName("UseSystemFileDialog", true)
xAccess.commitChanges
End Sub
Thanks for the code. I see we can even skip the line : aIsSystemDialog etc.
In the mean time I've choosen a different solution, just to make sure I
do not disturb users with a different dialog ("where is my desktop?" etc.):
If the directory is empty, I place a textfile (dummy.odt) that I remove
immediately after the fileficker has been used....
Thanks for the help,
best,
Cor
--
Cor Nouws
Arnhem - Netherlands
nl.OpenOffice.org - marketing contact
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
