Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Image Viewer
Message
De
25/07/2003 07:44:33
 
 
À
24/07/2003 21:57:41
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00812640
Message ID:
00813443
Vues:
11
Hi Teo,

>Could you Please show me an example.

Create a form (I use to do it programatically) and add the Explorer control:
Add Object oleBrowserWin  as oleControl  with Top       =  15               , ;
                                              Left      =  15               , ;
                                              Height    = 345               , ;
                                              Width     = 540               , ;
                                              Name      = "oleBrowserWin"   , ;
                                              OLEClass  = "Shell.Explorer.2"
Below are some methods you might use:
        Procedure ExplorerLoadImage   &&  Called whenever you want Explorer to show cLoadFileName
*                 -----------------
                  ThisForm.oleBrowserWin.Navigate (cLoadFileName)
        EndProc

        Procedure oleBrowserWin.Refresh  &&  This is due to a problem with the control
*                 ------------- -------
                  NoDefault
        EndProc

        Procedure oleBrowserWin.Init
*                 ------------- ----
                  cLoadFileName = "about:blank"

                  This.Navigate (cLoadFileName)
        EndProc
Try it and if you need further help, please let me know.

Regards,

Fernando
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform