Zoom in Gui?

  • Hallo,

    ich möchte gerne die Zoomfunktion
    in meiner Gui verwenden!

    Im IE ist das STRG +

    das geht aber in der Gui nicht!

    Gibt es da eine Möglichkeit?

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>
    $oIE = _IECreateEmbedded()

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

    $Form1 = GUICreate("Form1", 697, 520, 239, 155)
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 669, 493)
    GUISetState(@SW_SHOW)
    _Start()

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

    _IELoadWait ($oIE)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    func _Start()

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

    $Web = "http://www.hunde.de"

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

    _IENavigate($oIE,$Web)

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

    EndFunc

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

    Liebe Grüße
    ;) Ilse

    2 Mal editiert, zuletzt von Ilse (19. März 2012 um 13:22)

  • Hallo nochmal,

    ich krieg das einfach nicht zum laufen.
    Brauch nochmal Hilfe!

    Also, dieses Beispiel funktioniert!

    Spoiler anzeigen
    [autoit]


    #include <IE.au3>
    $sLink="hunde.com"
    $iZoom = 200
    $oIE = ObjCreate("Shell.Explorer.2")
    GUICreate('Test', 700, 500)
    GUICtrlCreateObj($oIE, 5,5, 690, 490)
    GUISetState()
    $test = _IENavigate($oIE, "about:blank")

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

    _IEBodyWriteHTML($oIE, "<iframe style='zoom:" & $iZoom & "%' src='http://" & $sLink & "' width='100%' height='100%'>")
    While 1
    Sleep(10)
    Switch GUIGetMsg()
    Case -3
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Ich habe nun ein Script mit Arrays...
    und das klappt leider nicht!

    Spoiler anzeigen
    [autoit]


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

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

    $iZoom = 200
    Dim $oIE[1]
    ;$oIE[0] = _IECreateEmbedded()
    $oIE[0] = ObjCreate("Shell.Explorer.2")
    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")
    ;_IEBodyWriteHTML($oIE[0], "<iframe style='zoom:" & $iZoom & "%' src='http://" & $sLink & "' width='100%' height='100%'>")
    ;_IEBodyWriteHTML($oIE[0], "<iframe style='zoom:" & $iZoom & "%' src='http://www.google.de' width='100%' height='100%'>")

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

    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]

    Ich habe mal meine Versuche deaktiviert!

    Liebe Grüße
    :( Ilse

  • Spoiler anzeigen
    [autoit]


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

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

    Global $iZoom = 100, $sLink = "autoit.de", $aTabs[1], $oIE[1]
    $oIE[0] = ObjCreate("Shell.Explorer.2")
    $hGUI = GUICreate("Browser",800,600)
    $hBtnNewTab = GUICtrlCreateButton("Neuer Tab",20,20,80,25)
    $hInput = GUICtrlCreateInput("",120,20,400,25)
    $hTabControl = GUICtrlCreateTab(20,60,760,520)
    $aTabs[0] = GUICtrlCreateTabItem("Tab")

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

    GUICtrlCreateObj($oIE[0],40,100,700,460)
    GUISetState()
    _IENavigate($oIE[0], "about:blank")
    _IEBodyWriteHTML($oIE[0], "<iframe style='zoom:" & $iZoom & "%' src='http://" & $sLink & "' width='100%' height='100%'>")
    GUICtrlSetData($hInput,"http://www."&$sLink)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    Case $hBtnNewTab
    $iIE = UBound($oIE)
    _ArrayAdd($aTabs,GUICtrlCreateTabItem("Tab"&$iIE))
    _ArrayAdd($oIE,_IECreateEmbedded())
    GUICtrlCreateObj($oIE[$iIE],40,100,700,460)
    _IENavigate($oIE[$iIE],"http://www.google.de")
    Case $hInput
    $selected = GUICtrlRead($hTabControl)
    _IENavigate($oIE[$selected],GUICtrlRead($hInput))
    WinSetTitle($hGUI,"",_IEPropertyGet($oIE[$selected],"locationname"))
    Case $hTabControl
    $selected = GUICtrlRead($hTabControl)
    WinSetTitle($hGUI,"",_IEPropertyGet($oIE[$selected],"locationname"))
    GUICtrlSetData($hInput,_IEPropertyGet($oIE[$selected],"locationurl"))
    EndSwitch
    WEnd

    [/autoit]

    Gruß Marvin

  • Hallo,

    muß mich wieder melden.
    Ich zerbreche mir schon seit Stunden
    den Kopf wie ich das machen kann.

    1. Ich lege mehrere Tabs an
    2. und dann soll je Tab der Zoom nachträglich geändert werden.

    Also am Anfang haben alle TABS 100%
    Ich klicke dann auf TAB 3 und gebe für diesen TAB 200% ein.

    Eine Idee wie man sowas machen kann?

    huh...
    Liebe Grüße
    ;) Ilse