LB Booster
« Open With dialog »

Welcome Guest. Please Login or Register.
Apr 1st, 2018, 04:38am



ATTENTION MEMBERS: Conforums will be closing it doors and discontinuing its service on April 15, 2018.
We apologize Conforums does not have any export functions to migrate data.
Ad-Free has been deactivated. Outstanding Ad-Free credits will be reimbursed to respective payment methods.

Thank you Conforums members.
Speed up Liberty BASIC programs by up to ten times!
Compile Liberty BASIC programs to compact, standalone executables!
Overcome many of Liberty BASIC's bugs and limitations!
LB Booster Resources
LB Booster documentation
LB Booster Home Page
LB Booster technical Wiki
Just BASIC forum
BBC BASIC Home Page
Liberty BASIC forum (the original)

« Previous Topic | Next Topic »
Pages: 1  Notify Send Topic Print
 thread  Author  Topic: Open With dialog  (Read 320 times)
Richard Russell
Administrator
ImageImageImageImageImage


member is offline

Avatar




Homepage PM


Posts: 1348
xx Open With dialog
« Thread started on: Jun 10th, 2015, 09:11am »

Somebody asked, by email, how to display the Open With dialog in LB code. Here you go:

Code:
    file$ = DefaultDir$ + "\OpenWith.bas" ' for example
    wide$ = space$(2 * _MAX_PATH)
    struct oai, pcszFile$ as ptr, pcszClass$ as ptr, oaifInFlags as long
    calldll #kernel32, "MultiByteToWideChar", 0 as long, 0 as long, _
      file$ as ptr, -1 as long, wide$ as ptr, _MAX_PATH as long, r as long
    oai.pcszFile$.struct = wide$
    oai.oaifInFlags.struct = 4
    calldll #shell32, "SHOpenWithDialog", 0 as long, oai as struct, r as long 

Richard.
User IP Logged

Pages: 1  Notify Send Topic Print
« Previous Topic | Next Topic »

| |

This forum powered for FREE by Conforums ©
Terms of Service | Privacy Policy | Conforums Support | Parental Controls