Hallo, ich habe für Sirocool mal einen Internetexplorer mit Tabs geschrieben nur als beispiel, vieleicht kann es ja jemand gebrauchen.
Spoiler anzeigen
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <IE.au3>
#include <GuiTab.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Tab",800,600, 0, 0)
$Url = GUICtrlCreateCombo("", 10, 3, 500, 25)
GUICtrlSetData(-1,"www.google.de|http://www.autoit.de|http://www.youtube.de|http://www.chip.de")
$OK = GUICtrlCreateButton ("OK",640, 3, 75, 25)
$Schliesen = GUICtrlCreateButton ("Schliesen",720,3,75, 25)
$Tab = GUICtrlCreateTab (5,30,790,565)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Dim $ie[1],$Obj[1]
_ArrayAdd ($ie,_IECreateEmbedded())
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $OK
_NewTab(GUICtrlRead ($url))
Case $Schliesen
_Close()
EndSwitch
WEnd
Func _NewTab($sText)
GUICtrlCreateTabItem ($sText)
_ArrayAdd ($ie ,_IECreateEmbedded())
_ArrayAdd ($Obj,GUICtrlCreateObj($ie[UBound ($ie) -1],5,52,790,544))
_IENavigate($ie[UBound ($ie) -1],$sText,0)
_GUICtrlTab_SetCurSel($Tab, _GUICtrlTab_GetItemCount($Tab) -1)
EndFunc
Func _Close()
Local $Zahl = _GUICtrlTab_GetCurSel($Tab)
If $Zahl > -1 Then
_GUICtrlTab_DeleteItem($Tab, $Zahl)
GUICtrlDelete ($Obj[$Zahl +1])
;~ _GUICtrlTab_SetCurSel($Tab, _GUICtrlTab_GetItemCount($Tab) -1)
EndIf
EndFunc
