resize Problem

Ilse

Hallo,

ich schaff es nicht die Tabs incl. inhalt
mit Resize zu vergrößern.

[autoit]

#include<Array.au3>
#include <IE.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

_IEErrorHandlerRegister ()

[/autoit][autoit][/autoit][autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit][autoit][/autoit][autoit]

$gui = GUICreate("Browser",612, 419, 203, 223, BitOR($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX))

[/autoit][autoit][/autoit][autoit]

GUICtrlSetResizing(-1, $GUI_DOCKALL)

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

$TabParent = GUICtrlCreateTab(20,60,760,520)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Tab[0] = GUICtrlCreateTabItem("Google")
GUICtrlCreateObj($oIE[0],40,100,700,460)

[/autoit][autoit][/autoit][autoit]

GUISetState()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

_IENavigate($oIE[0],"http://www.google.de")

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE

[/autoit][autoit][/autoit][autoit]

EndSwitch
WEnd

[/autoit]

Ich meine daß die Seite und das Tab und das Fenster
frei Skaliert werden,,, und maximize klappt auch nicht.

(...keine Nerven mehr)

Ilse

**Der_Doc**

Das verstehe ich nicht.
Wenn ich die Größe des Fensters verschiebe, dann ändert sich auch der Inhalt. Aber eben nur soweit wie es eben möglich ist.
Aber ich verstehe nicht genau dein Problem.

MfG
Der_Doc

Ilse

also,

im Tab wird ja die Internetadresse gezeigt.
Wenn ich nun das Fenster vergrößern will,
dann soll auch der Tab mit der Internetseite maximal hochgezogen werden.
Ich meine frei skalierbar, so daß die Internetseite im Tab maximal vergrößert wird.
(wird das Fenster größer, dann wird auch der Tab mit dem Inhalt größer)

vielleicht erkläre ich es mal so:
wenn ich im Forum einen Beitrag schreibe,
dann kann ich das Fenster unten rechts auch skalieren.
Der Beitrag selbst (also mein Tab mit der Internetseite) wird dem Fenster optimal angepasst!

**Oscar**

Meinst Du so:

Spoiler anzeigen

[autoit]

#include <Array.au3>
#include <IE.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

_IEErrorHandlerRegister()

[/autoit] [autoit][/autoit] [autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit] [autoit][/autoit] [autoit]

$gui = GUICreate("Browser", 800, 600, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX))

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$TabParent = GUICtrlCreateTab(20, 60, 760, 520)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$Tab[0] = GUICtrlCreateTabItem("Google")
GUICtrlCreateObj($oIE[0], 40, 100, 700, 460)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateTabItem("")
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE[0], "http://www.google.de")

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit]

Ilse

Hallo Oscar,

juhuu...ja genau so, Super!
Damit es perfekt ist, fehlt nur noch das maximize Symbol (Titelleiste)
Das geht leider noch nicht.
@SW_Maximize ist das der Befehl?
...wo muß das genau hin?

Grüße
Ilse

**Der_Doc**

Hi so kannst du die Box schonmal maximieren und sie wird in Max dargestellt nur deine Enbedet noch net.

[autoit]

$gui = GUICreate("Browser", 800, 600, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX,$WS_MAXIMIZEBOX,$WS_MAXIMIZE))

[/autoit]

MfG
Der_Doc

Ilse

Schade, da habe ich mich zu früh gefreut!

Wenn ich weitere Tabs habe, funktioniert es nicht mehr richtig!
Ich habe mal den original Code ohne Vergrößerung beigefügt

[autoit]

#include<Array.au3>
#include <IE.au3>
_IEErrorHandlerRegister ()

[/autoit][autoit][/autoit][autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit][autoit][/autoit][autoit]

$gui = GUICreate("Browser",800,600)
$NewTab = GUICtrlCreateButton("Neuer Tab",20,20,80,25)
$input = GUICtrlCreateInput("",120,20,400,25)
$TabParent = GUICtrlCreateTab(20,60,760,520)
$Tab[0] = GUICtrlCreateTabItem("Google")
GUICtrlCreateObj($oIE[0],40,100,700,460)

[/autoit][autoit][/autoit][autoit]

GUISetState()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

_IENavigate($oIE[0],"http://www.google.de")
GUICtrlSetData($input,_IEPropertyGet($oIE[0],"locationurl"))

[/autoit][autoit][/autoit][autoit]

While GUIGetMsg()<>-3 * Sleep(10)
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $NewTab
$iIE = UBound($oIE)
_ArrayAdd($Tab,GUICtrlCreateTabItem("Tab"&$iIE))
_ArrayAdd($oIE,_IECreateEmbedded())
GUICtrlCreateObj($oIE[$iIE],40,100,700,460)
_IENavigate($oIE[$iIE],"http://www.google.de")
Case $input
$selected = GUICtrlRead($TabParent)
_IENavigate($oIE[$selected],GUICtrlRead($input))
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))

[/autoit][autoit][/autoit][autoit]

Case $TabParent
$selected = GUICtrlRead($TabParent)
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))
GUICtrlSetData($input,_IEPropertyGet($oIE[$selected],"locationurl"))
EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit][/autoit]

Grüße
Ilse

**Oscar**

So:

Spoiler anzeigen

[autoit]

#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

_IEErrorHandlerRegister()

[/autoit] [autoit][/autoit] [autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit] [autoit][/autoit] [autoit]

$gui = GUICreate("Browser", 800, 600, -1, -1, BitOr($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX, $WS_MAXIMIZEBOX))
$NewTab = GUICtrlCreateButton("Neuer Tab", 20, 20, 80, 25)
$input = GUICtrlCreateInput("", 120, 20, 400, 25)
$TabParent = GUICtrlCreateTab(20, 60, 760, 520)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$Tab[0] = GUICtrlCreateTabItem("Google")
GUICtrlCreateObj($oIE[0], 40, 100, 700, 460)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateTabItem("") ; end tabitem definition

[/autoit] [autoit][/autoit] [autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE[0], "http://www.google.de")
GUICtrlSetData($input, _IEPropertyGet($oIE[0], "locationurl"))

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $NewTab
$iIE = UBound($oIE)
_ArrayAdd($Tab, GUICtrlCreateTabItem("Tab" & $iIE))
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
_ArrayAdd($oIE, _IECreateEmbedded())
GUICtrlCreateObj($oIE[$iIE], 40, 100, 700, 460)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
_IENavigate($oIE[$iIE], "http://www.google.de")
Case $input
$selected = GUICtrlRead($TabParent)
_IENavigate($oIE[$selected], GUICtrlRead($input))
WinSetTitle($gui, "", _IEPropertyGet($oIE[$selected], "locationname"))

[/autoit] [autoit][/autoit] [autoit]

Case $TabParent
$selected = GUICtrlRead($TabParent)
WinSetTitle($gui, "", _IEPropertyGet($oIE[$selected], "locationname"))
GUICtrlSetData($input, _IEPropertyGet($oIE[$selected], "locationurl"))
EndSwitch
WEnd

[/autoit]

Ilse

Guten Morgen Oscar,

das resize mit den Tabs funktioniert leider nicht. Schade

Kurze Info:

Der erste Tab stimmt immer, also der Inhalt
und die Größe des ersten Tabs passt sich an. Man kann es ändern... Stimmt soweit.

autoit.de/wcf/attachment/11612/

Wenn ich nun die Größe des Fensters verändere und mache einen neuen Tab
dann stimmt die Größe des Inhalts nicht mehr:
dann sieht das z.B. so aus:

autoit.de/wcf/attachment/11613/

jeder Tabinhalt ist unterschiedlich

autoit.de/wcf/attachment/11614/

Hier nochmal der originalcode ohne resize

[autoit]

#include<Array.au3>
#include <IE.au3>
_IEErrorHandlerRegister ()

[/autoit][autoit][/autoit][autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit][autoit][/autoit][autoit]

$gui = GUICreate("Browser",800,600)
$NewTab = GUICtrlCreateButton("Neuer Tab",20,20,80,25)
$input = GUICtrlCreateInput("",120,20,400,25)
$TabParent = GUICtrlCreateTab(20,60,760,520)
$Tab[0] = GUICtrlCreateTabItem("Tab")
GUICtrlCreateObj($oIE[0],40,100,700,460)

[/autoit][autoit][/autoit][autoit]

GUISetState()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

_IENavigate($oIE[0],"http://www.google.de")
GUICtrlSetData($input,_IEPropertyGet($oIE[0],"locationurl"))

[/autoit][autoit][/autoit][autoit]

While GUIGetMsg()<>-3 * Sleep(10)
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $NewTab
$iIE = UBound($oIE)
_ArrayAdd($Tab,GUICtrlCreateTabItem("Tab"&$iIE))
_ArrayAdd($oIE,_IECreateEmbedded())
GUICtrlCreateObj($oIE[$iIE],40,100,700,460)
_IENavigate($oIE[$iIE],"http://www.google.de")
Case $input
$selected = GUICtrlRead($TabParent)
_IENavigate($oIE[$selected],GUICtrlRead($input))
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))

[/autoit][autoit][/autoit][autoit]

Case $TabParent
$selected = GUICtrlRead($TabParent)
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))
GUICtrlSetData($input,_IEPropertyGet($oIE[$selected],"locationurl"))
EndSwitch
WEnd

[/autoit]

Ich meine es so:
Ich habe das Fenster in der Wunschgröße angepasst
und öffne dann mehrere Tabs.
Der Inhalt sollte bei resize bei allen Tabs stimmen

Liebe Grüße
Ilse

Großvater

Hallo Ilse,

ich habe es auf die Schnelle nicht geschafft, dem IE-Control seine aktuelle Größe zu entlocken. Man kann aber unter das erste IE-Control ein Label legen, das identische Größenanpassungen macht, und dann dieses abfragen:

Spoiler anzeigen

[autoit]

#include<Array.au3>
#include <GuiConstantsEx.au3>
#include <IE.au3>
#include <WindowsConstants.au3>
_IEErrorHandlerRegister ()

[/autoit] [autoit][/autoit] [autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit] [autoit][/autoit] [autoit]

$GUI = GUICreate("Browser",800,600, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
$NewTab = GUICtrlCreateButton("Neuer Tab",20,20,80,25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKTOP + $GUI_DOCKSIZE)
$input = GUICtrlCreateInput("",120,20,400,25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKTOP + $GUI_DOCKHEIGHT)
$TabParent = GUICtrlCreateTab(20,60,760,520)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
$Tab[0] = GUICtrlCreateTabItem("Google")
$idPos = GUICtrlCreateLabel("",40,100,700,460)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlCreateObj($oIE[0],40,100,700,460)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)

[/autoit] [autoit][/autoit] [autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE[0],"http://www.google.de", 0)
GUICtrlSetData($input,_IEPropertyGet($oIE[0],"locationurl"))

[/autoit] [autoit][/autoit] [autoit]

While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $NewTab
$aPos = ControlGetPos($GUI, "", $idPos)
$iIE = UBound($oIE)
_ArrayAdd($Tab,GUICtrlCreateTabItem("Tab"&$iIE))
_ArrayAdd($oIE,_IECreateEmbedded())
GUICtrlCreateObj($oIE[$iIE],$aPos[0],$aPos[1],$aPos[2],$aPos[3])
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
_IENavigate($oIE[$iIE],"http://www.google.de")
GUICtrlSetState($Tab[$iIE], $GUI_FOCUS)
Case $input
$selected = GUICtrlRead($TabParent)
_IENavigate($oIE[$selected],GUICtrlRead($input))
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))
Case $TabParent
$selected = GUICtrlRead($TabParent)
WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))
GUICtrlSetData($input,_IEPropertyGet($oIE[$selected],"locationurl"))
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Exit

[/autoit]

Das scheint unter XP halbwegs zu klappen.

**Oscar**

Großvater hat es ja bereits gelöst, aber ich wollte trotzdem mal meine Lösung (mit der Größe des TAB-Controls) zeigen:

Spoiler anzeigen

[autoit]

#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

_IEErrorHandlerRegister()

[/autoit] [autoit][/autoit] [autoit]

Dim $oIE[1]
$oIE[0] = _IECreateEmbedded()
Dim $Tab[1]

[/autoit] [autoit][/autoit] [autoit]

$gui = GUICreate("Browser", 800, 600, -1, -1, BitOr($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX, $WS_MAXIMIZEBOX))
$NewTab = GUICtrlCreateButton("Neuer Tab", 20, 20, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$input = GUICtrlCreateInput("", 120, 20, 400, 25)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$TabParent = GUICtrlCreateTab(20, 60, 760, 520)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
$Tab[0] = GUICtrlCreateTabItem("Google")
GUICtrlCreateObj($oIE[0], 40, 100, 700, 460)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
GUICtrlCreateTabItem("") ; end tabitem definition

[/autoit] [autoit][/autoit] [autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE[0], "http://www.google.de")
GUICtrlSetData($input, _IEPropertyGet($oIE[0], "locationurl"))

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $NewTab
$iIE = UBound($oIE)
_ArrayAdd($Tab, GUICtrlCreateTabItem("Tab" & $iIE))
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
_ArrayAdd($oIE, _IECreateEmbedded())
$aPos = ControlGetPos($gui, '', $TabParent) ; Größe des TAB-Controls
GUICtrlCreateObj($oIE[$iIE], 40 + ($aPos[0] - 20), 100 + ($aPos[1] - 60), 700 + ($aPos[2] - 760), 460 + ($aPos[3] - 520))
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
GUICtrlCreateTabItem("") ; end tabitem definition
GUISwitch($gui, $Tab[UBound($Tab)-1]) ; umschalten auf den neuen Tab
_IENavigate($oIE[$iIE], "http://www.google.de")
Case $input
$selected = GUICtrlRead($TabParent)
_IENavigate($oIE[$selected], GUICtrlRead($input))
WinSetTitle($gui, "", _IEPropertyGet($oIE[$selected], "locationname"))

[/autoit] [autoit][/autoit] [autoit]

Case $TabParent
$selected = GUICtrlRead($TabParent)
WinSetTitle($gui, "", _IEPropertyGet($oIE[$selected], "locationname"))
GUICtrlSetData($input, _IEPropertyGet($oIE[$selected], "locationurl"))
EndSwitch
WEnd

[/autoit]

Ilse

Hallo zusammen,

ein großes Lob an euch Super!
ich versuch nun noch meine ini zu integrieren

Ich hoffe es klappt

Liebe Grüße
Ilse