O$5: How to open an Explorer window
Mike Matthews
omnis at lineal.co.uk
Wed Jan 21 15:42:45 EST 2015
Thanks to Rudolf and Gary.
Works like a charm :)
Mike
Mike Matthews,
Managing Director, SQLWorks Software Ltd
Tel: +44 (0)1271 375999
Email: mike.matthews at sqlworks.co.uk
Web: www.sqlworks.co.uk
SQLWorks replaces Sage, ACT!, Opera, Access, SAP
On 21 Jan 2015, at 17:47, Rudolf Bargholz <rudolf at bargholz.ch> wrote:
> Hi Mike,
>
> The following will open the explorer in the given directory of a file, selecting the appropriate file in the Windows Explorer.
>
> Register DLL ("Shell32.dll","ShellExecuteA","JJCCCCJ")
> Call DLL ("Shell32.dll","ShellExecuteA",0,"#NULL#",'explorer.exe',con('/select,',lPath),'#NULL#',1)
>
> where lPath is the full path to a specific file.
>
> The following will open a specified directory:
>
> Register DLL ("Shell32.dll","ShellExecuteA","JJCCCCJ")
> Call DLL ("Shell32.dll","ShellExecuteA",0,"#NULL#",'explorer.exe', lDirectory,'#NULL#',1)
>
> Regards
>
> Rudolf Bargholz
>
> -----Ursprüngliche Nachricht-----
> Von: omnisdev-en-bounces at lists.omnis-dev.com [mailto:omnisdev-en-bounces at lists.omnis-dev.com] Im Auftrag von Mike Matthews
> Gesendet: Mittwoch, 21. Januar 2015 18:03
> An: OmnisDev List - English
> Betreff: O$5: How to open an Explorer window
>
> Hello All,
>
> I an using the FilesList component to show a list of files/folders in a directory. It hasn't been used/updated by TL for decades, but it works ok for me. The plus side is it shows the file icon, rather than using a tree and FileOps and not having the icon thumbnails.
>
> I am giving the user the option to open a folder on his desktop, so he can get at the files directly.
>
> On OSX I use an applescript:
> Text: tell application "Finder" (Carriage return)
> Text: open folder "[lvPath]" (Carriage return)
> Text: end tell (Carriage return)
>
> What can I use for Windows please to open a folder in Windows Explorer please from within Studio?
>
> Thanks
>
> Mike
>
>
>
>
> Mike Matthews,
> Managing Director, SQLWorks Software Ltd
>
> Tel: +44 (0)1271 375999
>
> Email: mike.matthews at sqlworks.co.uk
>
> Web: www.sqlworks.co.uk
>
> SQLWorks replaces Sage, ACT!, Opera, Access, SAP
>
>
> _____________________________________________________________
> Manage your list subscriptions at http://lists.omnis-dev.com
> _____________________________________________________________
> Manage your list subscriptions at http://lists.omnis-dev.com
More information about the omnisdev-en
mailing list