Page 1 of 1

Hide menu of the Internet explorer

Posted: Tue Aug 29, 2006 8:36 am
by Silvio
When I use this program I can see Internet explorer and I can navigate

Code: Select all


#include "FiveWin.ch"

function Main()

   local oWnd, oActiveX
   local cEvents := ""

   DEFINE WINDOW oWnd TITLE "fivetech"

   oActiveX = TActiveX():New( oWnd, "Shell.Explorer" )

   oWnd:oClient = oActiveX // To fill the entire window surface

   oActiveX:Do( "GoHome" )
   // oActiveX:Do( "Navigate", "http://www.fivetechsoft.com" )

    oActiveX:SetProp( "StatusBar", .t. )
   // MsgInfo( oActiveX:GetProp( "StatusBar" ) )

   oActiveX:bOnEvent = { | event, aParams | cEvents += EventInfo( event, aParams ) }

   ACTIVATE WINDOW oWnd


I want show/hide the menu when I click the left button of mouse

I want show/hide the address menu of Internet explorer

I want show/hide toolbar and status bar of IE


Best Regards

Posted: Thu Aug 31, 2006 12:21 pm
by Silvio
Dear Antonio
can you help me for it ?

Posted: Sat Sep 02, 2006 12:54 am
by Antonio Linares
Silvio,

Those are features of that specific activex control. They should work as you are doing it.

Sorry we can't help you on that issue, we don't know it.

Posted: Sat Sep 02, 2006 11:56 am
by Silvio
Now I found a code for Vb and delphi
Someone can translate it for xharbour


http://www.planet-source-code.com/vb/sc ... C101415668 ?


http://www.planet-source-code.com/vb/sc ... FA13602032

Posted: Sat Sep 02, 2006 7:46 pm
by Silvio
FOR the GURUS :

INTERNET EXPLORER ( EVENTS, METHOD, PROPERTIES)

http://msdn.microsoft.com/library/defau ... plorer.asp


THANKS