Please consider this source:
- Code: Select all Expand view RUN
#include "FiveWin.ch"
FUNCTION Main()
LOCAL oWnd, oActiveX
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support"
oActiveX = TActiveX():New( oWnd, "Shell.Explorer" )
oWnd:oClient = oActiveX
oActiveX:Do( "Navigate2", "c:\test.bmp" )
ACTIVATE WINDOW oWnd
RETURN nil
This always shows this dialog:
How can I prevent this "Open" dialog box and just show the image in the Shell.Explorer activeX?
Thanks!
Patrick