Jump to content

object doesn't work in the gui(with tab)


IVIarco
 Share

Recommended Posts

Hi all

I'm doing a tiny script,just for pratice with AI3 that open some internet expoorer's windows in the tab(and bring me to some sites)

But I dont know why dont work if i use tab(bed) gui :\

here the code:

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <ie.au3>

_IEErrorHandlerRegister ()
$oIE = _IECreateEmbedded ()
$oIE2 = _IECreateEmbedded ()

$Form1_1 = GUICreate("Form1", @DesktopWidth, @DesktopHeight, 100, 92)
$Tab1 = GUICtrlCreateTab(16, 40, 761, 465)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Tabsheet1")
$Group1 = GUICtrlCreateGroup("Group11", 32, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Group21", 400, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$Group1 = GUICtrlCreateGroup("Group12", 32, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Group22", 400, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$Group1 = GUICtrlCreateGroup("Group13", 32, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Group23", 400, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$Group1 = GUICtrlCreateGroup("Group14", 32, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Group24", 400, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet5 = GUICtrlCreateTabItem("TabSheet5")
$Group1 = GUICtrlCreateGroup("Group15", 32, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Group25", 400, 80, 361, 401)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
;$GUIActiveXneobux = GUICtrlCreateObj($oIE2, 32, 80, 361, 401)
_IENavigate ($oIE, "www.google.com")
_IENavigate ($oIE2, "www.yahoo.com")


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
$GUIActiveXform = GUICtrlCreateObj($oIE, 8, 32, 361, 401)

    EndSwitch
WEnd
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...