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) EndProcTry it and if you need further help, please let me know.