Date: prev next · Thread: first prev next last
2015 Archives by date, by thread · List index

Am 28.05.2015 um 21:56 schrieb Andreas Säger:
Am 28.05.2015 um 20:27 schrieb toki:

On 28/05/2015 16:38, James Knott wrote:

That was possible in OS/2, but I haven't seen it anywhere else.  With
OS/2, you could create a "Work Area" folder and whenever that folder was
opened, whatever was in it would also open.

Write a utility that creates a "Work Area" folder, regardless of the
platform one uses.
An interesting challenge for somebody who is good at PERL or Python coding.


This can be done with plain stupid StarBasic using the "application
open" event and some folder named "autostart" within the setup default
document folder.

Sub onApplicationStart()
oSrv = createUnoService("")
sPath = PathConcat(oSrv.Work, "AutoStart")
sDir = PathConcat(sPath, "*.*")
s = dir(sDir)
while len(s)
        sPathName = PathConcat(sPath,s)
        StarDesktop.loadComponentFromURL(sPathName, "_blank", 0, Array())
        s = dir()
End Sub

Function PathConcat(s1, s2)
        if right(s1,1) <> "/" then s1 = s1 & "/"
        PathConcat = s1 & s2
End Function

To unsubscribe e-mail to:
Posting guidelines + more:
List archive:
All messages sent to this list will be publicly archived and cannot be deleted


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.